From: Richard Stallman <rms@gnu.org>
Date: Tue, 21 Jul 1992 02:03:31 +0000 (+0000)
Subject: (MAYBE_VMS_FUNCTION_PROLOGUE): change _c$main_args to
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=1d59ba6f10eb26c9007e60a7fba0e0c92244b823;p=gcc.git

(MAYBE_VMS_FUNCTION_PROLOGUE): change _c$main_args to
uppercase instead of relying on gas to make the case translation

From-SVN: r1645
---

diff --git a/gcc/config/vax/vms.h b/gcc/config/vax/vms.h
index f7a7de345ed..ce7d1d901f6 100644
--- a/gcc/config/vax/vms.h
+++ b/gcc/config/vax/vms.h
@@ -94,13 +94,13 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
 #define MAYBE_VMS_FUNCTION_PROLOGUE(FILE)	\
 { extern char *current_function_name;		\
   if (!strcmp ("main", current_function_name))	\
-    fprintf(FILE, "\tjsb _c$main_args\n"); 	\
+    fprintf(FILE, "\tjsb _C$MAIN_ARGS\n"); 	\
   else {					\
     char *p = current_function_name;		\
     while (*p != '\0')				\
       if (*p == *__MAIN_NAME)			\
         if (strncmp(p, __MAIN_NAME, (sizeof __MAIN_NAME)-1) == 0) {\
-          fprintf(FILE, "\tjsb _c$main_args\n");\
+          fprintf(FILE, "\tjsb _C$MAIN_ARGS\n");\
           break;				\
         } else					\
           p++;					\