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

 Thu Jan 29 01:28:14 1998  Klaus Kaempf  <kkaempf@progis.de>
 
+	* 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.

gcc/cccp.c

@@ -10259,7 +10259,7 @@ VMS_open (fname, flags, prot)
 #include <fab.h>
 #include <nam.h>
 
-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);
 	}
     }
 

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:"

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.