This is the mail archive of the
gcc-prs@gcc.gnu.org
mailing list for the GCC project.
libf2c/7236: OPEN(...,RECL=nnn,...) without ACCESS='DIRECT' should assume a direct access file.
- From: Toon at sources dot redhat dot com, Moene <toon at moene dot indiv dot nluug dot nl
- To: gcc-gnats at gcc dot gnu dot org
- Date: 8 Jul 2002 19:25:58 -0000
- Subject: libf2c/7236: OPEN(...,RECL=nnn,...) without ACCESS='DIRECT' should assume a direct access file.
- Reply-to: Toon at sources dot redhat dot com, Moene <toon at moene dot indiv dot nluug dot nl
>Number: 7236
>Category: libf2c
>Synopsis: OPEN(...,RECL=nnn,...) without ACCESS='DIRECT' should assume a direct access file.
>Confidential: no
>Severity: serious
>Priority: medium
>Responsible: unassigned
>State: open
>Class: rejects-legal
>Submitter-Id: net
>Arrival-Date: Mon Jul 08 12:35:59 PDT 2002
>Closed-Date:
>Last-Modified:
>Originator: Toon Moene <toon@moene.indiv.nluug.nl
>Release: gcc-3.x
>Organization:
>Environment:
All
>Description:
The following program:
open(unit=1,file='datafile.dat',recl=132,status='old')
Read(1,10) x,y,z
10 FOrmat(3f10.2)
end
fails with:
sfe: formatted io not allowed
apparent state: unit 1 named datafile.dat
lately reading sequential formatted external IO
probably because it assumes direct access (due to the
recl=132 clause) which defaults to unformatted I/O.
>How-To-Repeat:
>Fix:
Should implement Fortran 90 semantics, i.e., assume
a sequential file (because ACCESS='DIRECT' is not
specified) and hence formatted I/O.
>Release-Note:
>Audit-Trail:
>Unformatted: