* toplev.c (vms_fopen): Remove, not needed.

From-SVN: r50584

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 0b88f6400e5bf69d0251088523f0d9a2331c48c4..776a16264168327205819bcb3ba3b670fff5179e 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,5 +1,7 @@
 2002-03-11  Douglas B Rupp  <rupp@gnat.com>
 
+       * toplev.c (vms_fopen): Remove, not needed.
+
        * vmsdbgout.c (lookup_filename): Adjust creation date for GMT.
 
        * config/alpha/xm-vms.h (__UNIX_FWRITE): Define.

diff --git a/gcc/toplev.c b/gcc/toplev.c
index 2e120f85b41a5051f80cd53c5570bfc1a78ac3fe..6530adfd0e72d5bafa29ef0e3f346b0e1156303d 100644 (file)
--- a/gcc/toplev.c
+++ b/gcc/toplev.c
@@ -92,29 +92,6 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 #include "halfpic.h"
 #endif
 \f
-#ifdef VMS
-/* The extra parameters substantially improve the I/O performance.  */
-
-static FILE *
-vms_fopen (fname, type)
-     char *fname;
-     char *type;
-{
-  /* The <stdio.h> in the gcc-vms-1.42 distribution prototypes fopen with two
-     fixed arguments, which matches ANSI's specification but not VAXCRTL's
-     pre-ANSI implementation.  This hack circumvents the mismatch problem.  */
-  FILE *(*vmslib_fopen)() = (FILE *(*)()) fopen;
-
-  if (*type == 'w')
-    return (*vmslib_fopen) (fname, type, "mbc=32",
-                           "deq=64", "fop=tef", "shr=nil");
-  else
-    return (*vmslib_fopen) (fname, type, "mbc=32");
-}
-
-#define fopen vms_fopen
-#endif /* VMS  */
-
 /* Carry information from ASM_DECLARE_OBJECT_NAME
    to ASM_FINISH_DECLARE_OBJECT.  */