From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 4589 invoked by alias); 8 Jul 2002 19:36:03 -0000 Mailing-List: contact gcc-prs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-prs-owner@gcc.gnu.org Received: (qmail 4549 invoked by uid 71); 8 Jul 2002 19:36:01 -0000 Resent-Date: 8 Jul 2002 19:36:00 -0000 Resent-Message-ID: <20020708193600.4548.qmail@sources.redhat.com> Resent-From: gcc-gnats@gcc.gnu.org (GNATS Filer) Resent-To: nobody@gcc.gnu.org Resent-Cc: gcc-prs@gcc.gnu.org, gcc-bugs@gcc.gnu.org Resent-Reply-To: gcc-gnats@gcc.gnu.org, Toon@sources.redhat.com, Moene Date: Mon, 08 Jul 2002 12:36:00 -0000 From: Toon@sources.redhat.com, Moene >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 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: