From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 4175 invoked by alias); 10 Jul 2002 21:55:09 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Received: (qmail 4167 invoked from network); 10 Jul 2002 21:55:07 -0000 Received: from unknown (HELO laptop.moene.indiv.nluug.nl) (195.109.255.217) by sources.redhat.com with SMTP; 10 Jul 2002 21:55:07 -0000 Received: from local ([127.0.0.1] helo=moene.indiv.nluug.nl) by laptop.moene.indiv.nluug.nl with esmtp (Exim 3.12 #1 (Debian)) id 17SPRE-0005fn-00; Wed, 10 Jul 2002 23:55:56 +0200 Message-ID: <3D2CAD6B.9A02198C@moene.indiv.nluug.nl> Date: Wed, 10 Jul 2002 14:55:00 -0000 From: Toon Moene Organization: Moene Computational Physics, Maartensdijk, The Netherlands X-Accept-Language: en MIME-Version: 1.0 To: Rob Willson , gcc-help@gcc.gnu.org Subject: Re: Problem with g77 Fortran References: <3D24A9AC.4A816DA6@moene.indiv.nluug.nl> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit X-SW-Source: 2002-07/txt/msg00099.txt.bz2 I wrote: > Rob Willson wrote: > > open(unit=1,file='datafile.dat', recl=132,status='old') > > Read(1,10) x,y,z > > 10 FOrmat(3f10.2) > > > > When I say: f77 -o prog prog.f , I get a statement.." sfe: formatted io > > is not allowed" > > The "recl=132" makes the run time library think this is a direct access > file. Removing it will make the program work. This analysis is not correct - it makes the run time library think this is an unformatted file. > I'll look up whether this is correct behaviour. I asked around on comp.lang.fortran; this is the result: Fortran 77 left this open - Fortran 90 interpreted it as: The record length is the maximum you can use (write to) on sequential I/O. I made a fix to the g77 run time library to allow RECL=nnn without having it assuming you want unformatted I/O. This change will be in the next major release. Cheers, -- Toon Moene - mailto:toon@moene.indiv.nluug.nl - phoneto: +31 346 214290 Saturnushof 14, 3738 XG Maartensdijk, The Netherlands Maintainer, GNU Fortran 77: http://gcc.gnu.org/onlinedocs/g77_news.html Join GNU Fortran 95: http://g95.sourceforge.net/ (under construction)