Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Posting-Version: version B 2.10.3 4.3bsd-beta 6/6/85; site wucec2.UUCP Path: utzoo!watmath!clyde!burl!ulysses!mhuxr!mhuxn!ihnp4!mgnetp!we53!busch!wucs!wucec2!jdz From: jdz@wucec2.UUCP (Jason D. Zions) Newsgroups: net.lang.f77 Subject: Re: (do) while loops Message-ID: <1136@wucec2.UUCP> Date: Sun, 27-Oct-85 15:20:40 EST Article-I.D.: wucec2.1136 Posted: Sun Oct 27 15:20:40 1985 Date-Received: Mon, 28-Oct-85 04:04:41 EST References: <144@oberon.UUCP> <4486@alice.UUCP> Reply-To: jdz@wucec2.UUCP (Jason D. Zions) Distribution: net Organization: Wash. U. Center for Engineering Computing Lines: 32 Summary: Not ANSI std., but MIL-SPEC ! >> What I ran into was an error about an unknown statement type. It turned >> out to be a do while statement of the form: >> >> DOWHILE(true) >> something borring >> ENDDO >> >> My question is: doesn't Unix (ANSI) f77 support a (do) while statement? >> What is it's syntax? > >The Fortran 77 standard doesn't have any kind of a while statement. Correct; ANSI FORTRAN doesn't have this. However, the DOD insisted on adding stuff to Fortran; there is a Military specification (MIL-SPEC 1754 (The number may be incorrect)) which extends the language. The DO WHILE .. END DO construct is one of the extensions. Another is the elimination of the line number from a DO loop; i.e. DO I=1, 10 code code code END DO with no CONTINUE or label or anything. I particularly like this one. The MIL SPEC adds required intrinsics for bit-wise operations and some other stuff. The HP-1000 compiler implements the complete MIL-SPEC extensions; other manufacturers implement as much or as little as they please. -- Jason D. Zions jdz@wucec2 Center for Engineering Computing ...ihnp4!wucs!wucec2!jdz Washington University in St. Louis [Strictly opinions; my employers aren't responsible (not even for hiring me!)]