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

        truncate to 64 characters.

vmskrunch changes need this.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@16098 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 045496a..d9cf246 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 1c99ab6..f51796b 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;