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

From-SVN: r50584
This commit is contained in:
Douglas B Rupp 2002-03-11 08:27:46 -05:00 committed by Richard Kenner
parent 6f1fd286cd
commit fa2d765a47
2 changed files with 2 additions and 23 deletions

View File

@ -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.

View File

@ -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 <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. */