From fa2d765a47f69e32c79695d95b866e5f4f33f1e9 Mon Sep 17 00:00:00 2001 From: Douglas B Rupp Date: Mon, 11 Mar 2002 08:27:46 -0500 Subject: * toplev.c (vms_fopen): Remove, not needed. From-SVN: r50584 --- gcc/toplev.c | 23 ----------------------- 1 file changed, 23 deletions(-) (limited to 'gcc/toplev.c') diff --git a/gcc/toplev.c b/gcc/toplev.c index 2e120f8..6530adf 100644 --- 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 -#ifdef VMS -/* The extra parameters substantially improve the I/O performance. */ - -static FILE * -vms_fopen (fname, type) - char *fname; - char *type; -{ - /* The 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. */ -- cgit v1.1