Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!cs.utexas.edu!uunet!mcsun!ukc!cam-cl!nmm
From: nmm@cl.cam.ac.uk (Nick Maclaren)
Newsgroups: comp.lang.fortran
Subject: Re: Standard conformance
Message-ID: <888@scaup.cl.cam.ac.uk>
Date: 16 Sep 89 11:26:01 GMT
References: <1301@tukki.jyu.fi>
Sender: news@cl.cam.ac.uk
Reply-To: nmm@cl.cam.ac.uk (Nick Maclaren)
Organization: U of Cambridge Comp Lab, UK
Lines: 21

markku@jytko.jyu.fi (Markku Sakkinen) objects to the following erroneous
construction not being flagged by the VMS or Sun Fortran compilers:

>      INTEGER I, J
>      IF (I .LT. 100000) GOTO 2
>      DO 9 I = 1, 10
>2     J = I * I
>      WRITE (6, 100) I, J
>9     CONTINUE
>100   FORMAT (2I12)
>      END

I fully agree!  This all comes of using nasty systems like VAX/VMS and
UNIX - we use IBM's VS Fortran under MVS/XA and it does diagnose that
sort of error!  [Please insert smileys to taste.]

I am not currently an employee of IBM (nor even a shareholder) ....

Nick Maclaren
University of Cambridge Computer Laboratory
nmm @ cl.cam.ac.uk