Commit fa2d765a by Douglas B Rupp Committed by Richard Kenner

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

From-SVN: r50584
parent 6f1fd286
2002-03-11 Douglas B Rupp <rupp@gnat.com> 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. * vmsdbgout.c (lookup_filename): Adjust creation date for GMT.
* config/alpha/xm-vms.h (__UNIX_FWRITE): Define. * config/alpha/xm-vms.h (__UNIX_FWRITE): Define.
......
...@@ -92,29 +92,6 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA ...@@ -92,29 +92,6 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
#include "halfpic.h" #include "halfpic.h"
#endif #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 /* Carry information from ASM_DECLARE_OBJECT_NAME
to ASM_FINISH_DECLARE_OBJECT. */ to ASM_FINISH_DECLARE_OBJECT. */
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment