alpha.c (output_prolog, VMS): Use alloca for entry_label and don't truncate to 64...

        * alpha.c (output_prolog, VMS): Use alloca for entry_label and don't
        truncate to 64 characters.

vmskrunch changes need this.

Co-Authored-By: Jeffrey A Law <law@cygnus.com>
Co-Authored-By: Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
From-SVN: r16098

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 045496a91065ef3e04666f3fe1579b550e5aefd4..d9cf246fe1db5f9fa5059dbfe42a7766f4cb7883 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,16 @@
+Mon Oct 20 02:00:18 1997  Klaus Kaempf <kkaempf@progis.de>
+                         Jeff Law <law@cygnus.com>
+                         Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
+
+       * alpha/alpha.c (vmskrunch): Delete
+       * alpha/vms.h (ENCODE_SECTION_INFO, ASM_DECLARE_FUNCTION_NAME): Delete.
+       * alpha.c (output_prolog, VMS): Use alloca for entry_label and don't
+       truncate to 64 characters.
+
+       * make-l2.com: Support openVMS/Alpha.
+
+       * vmsconfig.com: Fix to work on openVMS/Alpha and openVMS/VAX.
+
 Sun Oct 19 19:00:35 1997 J"orn Rennecke <amylaar@cygnus.co.uk>
 
        * longlong.h (count_leading_zeros): Add missing casts to USItype.

diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c
index 1c99ab6fcec0fe9a5489887df8a463148ed79f4b..f51796b7f0bdf260776cf9bc8945ed4e0eee2551 100644 (file)
--- a/gcc/config/alpha/alpha.c
+++ b/gcc/config/alpha/alpha.c
@@ -2022,7 +2022,7 @@ output_prolog (file, size)
   /* Offset during register save.  */
   int reg_offset;
   /* Label for the procedure entry.  */
-  char entry_label[70];
+  char *entry_label = (char *) alloca (strlen (alpha_function_name) + 5);
   int i;
 
   sa_size = alpha_sa_size ();
@@ -2035,7 +2035,7 @@ output_prolog (file, size)
   fprintf (file, "\t.ent ");
   assemble_name (file, alpha_function_name);
   fprintf (file, "\n");
-  sprintf (entry_label, "%.64s..en", alpha_function_name);
+  sprintf (entry_label, "%s..en", alpha_function_name);
   ASM_OUTPUT_LABEL (file, entry_label);
   inside_function = TRUE;