Re: [ccp4bb] gfortran and direct access files

- Protein crystallography

Main steps:

- Protein purification
- Crystallisation

Special:

- Programs for crystallography
- X-ray detectors

Basic tutorials:

   - Chemistry
   - Protein
   - Peptide
   - Amino Acids

Xtal community:

- CCP4BB

CCP4bb navigation

CCP4bb <-- 1999 <-- November 1999 <-- 30 November 1999

Previous message:
Subject: gfortran compiler & direct access files
From: Vellieux Frederic Frederic {- dot -} Vellieux {- at -} IBS {- dot -} FR
Date: 2009-11-02

Next message:
Subject: Re: automar
From: Ed Pozharski epozh001 {- at -} UMARYLAND {- dot -} EDU
Date: 2009-11-02

Subject: Re: gfortran and direct access files
From: Vellieux Frederic Frederic {- dot -} Vellieux {- at -} IBS {- dot -} FR
Date: 2009-11-02

X-Account-Key: account2
X-Mozilla-Keys:
Return-Path:
Received: from murder ([unix socket])
by ibsprive (Cyrus v2.2.13-Debian-2.2.13-14+b3) with LMTPA;
Mon, 02 Nov 2009 18:53:08 +0100
X-Sieve: CMU Sieve 2.2
Received: from mailfilter.ibs.fr (mailfilter.ibs.fr [192.134.36.20])
by smtp.ibs.fr (Postfix) with ESMTP id 43550479C2
for ; Mon, 2 Nov 2009 18:53:08 +0100 (CET)
Received: from ibspublic.ibs.fr (ibspublic.ibs.fr [195.220.63.93])
by mailfilter.ibs.fr (Postfix) with ESMTP id 1D1AB3B84F
for ; Mon, 2 Nov 2009 18:52:53 +0100 (CET)
X-Greylist: delayed 1840 seconds by postgrey-1.27 at ibspublic; Mon, 02 Nov 2009 18:52:52 CET
Received: from troutmask.apl.washington.edu (troutmask.apl.washington.edu [128.208.78.105])
by ibspublic.ibs.fr (Postfix) with ESMTP id 3F06A37B37
for ; Mon, 2 Nov 2009 18:52:52 +0100 (CET)
Received: from troutmask.apl.washington.edu (localhost.apl.washington.edu [127.0.0.1])
by troutmask.apl.washington.edu (8.14.3/8.14.3) with ESMTP id nA2HM5LP031294;
Mon, 2 Nov 2009 09:22:05 -0800 (PST)
(envelope-from sgk@troutmask.apl.washington.edu)
Received: (from sgk@localhost)
by troutmask.apl.washington.edu (8.14.3/8.14.3/Submit) id nA2HM5RR031293;
Mon, 2 Nov 2009 09:22:05 -0800 (PST)
(envelope-from sgk)
Date: Mon, 2 Nov 2009 09:22:05 -0800
From: Steve Kargl
To: Vellieux Frederic
Cc: fortran@gcc.gnu.org
Subject: Re: bug in gfortran and direct access files???
Message-ID: <20091102172205.GB31162@troutmask.apl.washington.edu>
References: <4AEF0FA1.4040405@ibs.fr>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
In-Reply-To: <4AEF0FA1.4040405@ibs.fr>
User-Agent: Mutt/1.4.2.3i
X-MailScanner-ID: 1D1AB3B84F.E33F0
X-Virus-Check: Clean
X-Spam-Check: not spam, SpamAssassin (not cached, score=0, requis 5,
autolearn=disabled)
MailScanner-NULL-Check: 1257789174.99626@B8Vwgw0cG1gmCfItk6gL/w
X-Spam-Status: No

On Mon, Nov 02, 2009 at 05:58:09PM +0100, Vellieux Frederic wrote:
> Dear gfortran developers,
>
> I have a problem with writing to direct access files using gfortran (get
> a run time error, "Fortran runtime error: Record number not allowed for
> sequential access data transfer").
>
> The error does not occur with code compiled using g77.
>
> I am enclosing herewith a small program that gives this error.
>

The code is non-conforming. From the Fortran 2003 Standard.

9.5.1.11 REC= specifier in a data transfer statement

The REC= specifier specifies the number of the record that is to be
read or written. This specifier may appear only in an input/output
statement that specifies a unit connected for direct access; ...

PROGRAM TOTO
IREC=1
ISIZ1=1870
OPEN(UNIT=23,ACCESS='SEQUENTIAL',STATUS='SCRATCH',
. FORM='UNFORMATTED',RECL=ISIZ1)
WRITE(23,REC=IREC) IREC
END

Your code clearly specifies SEQUENTIAL access, so gfortran
reports the error. Change SEQUENTIAL to DIRECT.

--
Steve

CCP4bb navigation

CCP4bb <-- 1999 <-- November 1999 <-- 30 November 1999

Previous message:
Subject: gfortran compiler & direct access files
From: Vellieux Frederic Frederic {- dot -} Vellieux {- at -} IBS {- dot -} FR
Date: 2009-11-02

Next message:
Subject: Re: automar
From: Ed Pozharski epozh001 {- at -} UMARYLAND {- dot -} EDU
Date: 2009-11-02