Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!bloom-beacon!apple!voder!pyramid!pta!yarra!ditmela!murtoa.cs.mu.oz.au!munnari!bruce!monu1!vaxc!cie590l
From: hadgraft@civeng.monash.edu.au (Roger Hadgraft)
Newsgroups: comp.lang.fortran
Subject: Re: DO loops, anyone? - Lahey F77L output
Message-ID: <2964@vaxc.cc.monash.edu.au>
Date: 16 Mar 89 21:58:43 GMT
References: <458@orange19.qtp.ufl.edu>
Sender: cie590l@vaxc.cc.monash.edu.au (Hadgraft)
Organization: Civil Engineering, Monash University, Australia
Lines: 24

In article <458@orange19.qtp.ufl.edu>, bernhold@qtp.ufl.edu (David E. Bernholdt) writes:
> I run the following code on my Sun 3/50 with VMS compatible f77:
>
    ...
>
> And I get the following output:
>
    ...
> --
> David Bernholdt                       bernhold@qtp.ufl.edu
> Quantum Theory Project                bernhold@ufpine.bitnet
> University of Florida
> Gainesville, FL  32611                904/392 6365

Here is what Lahey's F77L PC compiler thought of the example:

FATAL - Label (501) appears in transfer context outside DO range or BLOCK IF
(See Section 8.0 in F77L Manual), line 5.

--
Roger Hadgraft                  |  hadgraft@civeng.monash.edu.au@munnari.oz
Lecturer in Civil Engineering   |  phone:  +61 3 565 4983
Monash University               |  fax:    +61 3 565 3409
Clayton, Vic. 3168. Australia.  |