Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!watmath!clyde!caip!ut-sally!seismo!mcvax!ukc!dcl-cs!cathy
From: cathy@comp.lancs.ac.uk (Cathy)
Newsgroups: net.lang.f77
Subject: Re: possible implied-do bug?
Message-ID: <248@comp.lancs.ac.uk>
Date: Mon, 30-Jun-86 18:48:32 EDT
Article-I.D.: comp.248
Posted: Mon Jun 30 18:48:32 1986
Date-Received: Thu, 3-Jul-86 01:33:20 EDT
References: <1452@alvin.mcnc.UUCP>
Reply-To: cathy@comp.lancs.ac.uk (Cathy)
Organization: Department of Computing at Lancaster University, UK.
Lines: 46
Keywords: implied do, parenthesis

In article <1452@alvin.mcnc.UUCP> kenkel@mcnc.UUCP writes:
>The following program compiles under VMS fortran, but not
>f77:
>
>	  dimension l(10),m(10),n(10)
>          write (*, * ) i,((l(k), m(k), n (k)), k=1,10)
>	  end
>
>This version works:
>
	...
>
>The extra parenthesis around the items in the implied do list
>appears to be causing trouble.  Is this a bug, or is the compiler
>in compliance with the standard?
>

	The compiler seems to agree with the standard. The syntax is:

io_implied_do_list
	:	"(" io_list "," id "=" exp "," exp [ "," exp ] ")"
	;
io_list
	:	io_entity ( "," io_entity )*
	;

io_entity
	:	array_variable
	|	io_implied_do_list
	;

	The extra bracket would imply an internal io_implied_do_list.

		Best wishes,
			Cathy

-- 

	 - Marxist unite!
	 - Leaders unite!
	 - Bad-spellers of the of the world untie!
  
UUCP:  ...!seismo!mcvax!ukc!dcl-cs!cathy
DARPA: cathy%lancs.comp@ucl-cs	| Post: University of Lancaster,
JANET: cathy@uk.ac.lancs.comp	|	Department of Computing,
Phone: +44 524 65201 ext ????	|	Bailrigg, Lancaster, LA1 4YR, UK.