Commit 1d59ba6f by Richard Stallman

(MAYBE_VMS_FUNCTION_PROLOGUE): change _c$main_args to

uppercase instead of relying on gas to make the case translation

From-SVN: r1645
parent 01571284
......@@ -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++; \
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment