From 9d21ee77f44afdbe657ff4f8ea2511be7d3d4c28 Mon Sep 17 00:00:00 2001 From: Klaus Kaempf Date: Thu, 29 Jan 1998 09:04:10 +0000 Subject: [PATCH] cccp.c (SYS$SEARCH, SYS$PARSE): Write as upper-case. * cccp.c (SYS$SEARCH, SYS$PARSE): Write as upper-case. * vmsconfig.com: Remove bytecode references. * alpha/vms.h (PREFIX): Define. * alpha/vms.h (ASM_OUTPUT_ALIGNED_COMMON): Remove. From-SVN: r17547 --- gcc/ChangeLog | 8 ++++++++ gcc/cccp.c | 12 ++++++------ gcc/config/alpha/vms.h | 10 ++-------- gcc/vmsconfig.com | 2 -- 4 files changed, 16 insertions(+), 16 deletions(-) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index bcc83c93086..868e0e704b4 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,5 +1,13 @@ Thu Jan 29 01:28:14 1998 Klaus Kaempf + * cccp.c (SYS$SEARCH, SYS$PARSE): Write as upper-case. + + * vmsconfig.com: Remove bytecode references. + + * alpha/vms.h (PREFIX): Define. + + * alpha/vms.h (ASM_OUTPUT_ALIGNED_COMMON): Remove. + * am-alpha.h: Don't include alloca for OPEN_VMS. * alpha/xm-vms.h (HAVE_CPP_STRINGIFY): Define. diff --git a/gcc/cccp.c b/gcc/cccp.c index 486206a441f..5df4901a00f 100644 --- a/gcc/cccp.c +++ b/gcc/cccp.c @@ -10259,7 +10259,7 @@ VMS_open (fname, flags, prot) #include #include -extern unsigned long sys$parse(), sys$search(); +extern unsigned long SYS$PARSE(), SYS$SEARCH(); /* Work around another library bug. If a file is located via a searchlist, and if the device it's on is not the same device as the one specified @@ -10306,8 +10306,8 @@ VMS_stat (name, statbuf) { struct FAB fab; struct NAM nam; - char exp_nam[NAM$C_MAXRSS+1], /* expanded name buffer for sys$parse */ - res_nam[NAM$C_MAXRSS+1]; /* resultant name buffer for sys$search */ + char exp_nam[NAM$C_MAXRSS+1], /* expanded name buffer for SYS$PARSE */ + res_nam[NAM$C_MAXRSS+1]; /* resultant name buffer for SYS$SEARCH */ fab = cc$rms_fab; fab.fab$l_fna = (char *) name; @@ -10317,9 +10317,9 @@ VMS_stat (name, statbuf) nam.nam$l_esa = exp_nam, nam.nam$b_ess = sizeof exp_nam - 1; nam.nam$l_rsa = res_nam, nam.nam$b_rss = sizeof res_nam - 1; nam.nam$b_nop = NAM$M_PWD | NAM$M_NOCONCEAL; - if (sys$parse (&fab) & 1) + if (SYS$PARSE (&fab) & 1) { - if (sys$search (&fab) & 1) + if (SYS$SEARCH (&fab) & 1) { res_nam[nam.nam$b_rsl] = '\0'; result = stat (res_nam, statbuf); @@ -10327,7 +10327,7 @@ VMS_stat (name, statbuf) /* Clean up searchlist context cached by the system. */ nam.nam$b_nop = NAM$M_SYNCHK; fab.fab$l_fna = 0, fab.fab$b_fns = 0; - (void) sys$parse (&fab); + (void) SYS$PARSE (&fab); } } diff --git a/gcc/config/alpha/vms.h b/gcc/config/alpha/vms.h index 57618907fda..c149ecf4211 100644 --- a/gcc/config/alpha/vms.h +++ b/gcc/config/alpha/vms.h @@ -405,14 +405,6 @@ extern int vms_valid_decl_attribute_p (); #define UNALIGNED_INT_ASM_OP ".long" #define UNALIGNED_DOUBLE_INT_ASM_OP ".quad" -#undef ASM_OUTPUT_ALIGNED_COMMON -#define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN) \ -do { \ - fprintf ((FILE), "\t.comm\t"); \ - assemble_name ((FILE), (NAME)); \ - fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT); \ -} while (0) - #define ASM_OUTPUT_SECTION(FILE,SECTION) \ (strcmp (SECTION, ".text") == 0) \ ? text_section () \ @@ -476,3 +468,5 @@ do { \ #define UMODDI3_LIBCALL "OTS$REM_UL" #define DIR_SEPARATOR ']' + +#define PREFIX "GNU_ROOT:" diff --git a/gcc/vmsconfig.com b/gcc/vmsconfig.com index 87d34daa5a8..4400e6c7ef0 100644 --- a/gcc/vmsconfig.com +++ b/gcc/vmsconfig.com @@ -177,8 +177,6 @@ PROCEDURE process_makefile( ) generate_option_file ("OBJS", "=", "independent.opt"); generate_option_file ("LIB2FUNCS", "=", "libgcc2.list"); generate_option_file ("CXX_LIB2FUNCS", "=", "libgcc2-cxx.list"); - generate_option_file ("BC_ALL", "=", "bc_all.list"); - generate_option_file ("BI_OBJ", "=", "bi_all.opt"); ! ! Now change OBJS in the Makefile, so each language specific options file ! does not pick up all of the language independent files. -- 2.30.2