This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: Really, really, poor IO performance!
- From: Steve Kargl <sgk at troutmask dot apl dot washington dot edu>
- To: fortran at gcc dot gnu dot org
- Date: Mon, 30 May 2005 09:34:37 -0700
- Subject: Re: Really, really, poor IO performance!
- References: <20050530021206.GA9623@troutmask.apl.washington.edu>
On Sun, May 29, 2005 at 07:12:06PM -0700, Steve Kargl wrote:
>
> Index: unix.c
> ===================================================================
> RCS file: /cvs/gcc/gcc/libgfortran/io/unix.c,v
> retrieving revision 1.26
> diff -c -p -r1.26 unix.c
> *** unix.c 17 May 2005 16:54:51 -0000 1.26
> --- unix.c 30 May 2005 02:10:48 -0000
> *************** regular_file (unit_flags *flags)
> *** 1067,1075 ****
>
> case STATUS_UNKNOWN:
> case STATUS_SCRATCH:
> - crflag = O_CREAT;
> - break;
> -
> case STATUS_REPLACE:
> crflag = O_CREAT | O_TRUNC;
> break;
> --- 1068,1073 ----
>
This is libfortran/21820. The above patch has been
bootstrapped and regtested on i386-*-freebsd. Note,
the patch is required to properly implement the
semantics of REPLACE as given in 9.3.4.2.
--
Steve