Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!wuarchive!texbell!uhnix1!sugar!ficc!peter
From: peter@ficc.uu.net (Peter da Silva)
Newsgroups: comp.lang.c
Subject: Re: ambiguous ?
Message-ID: <6591@ficc.uu.net>
Date: 19 Oct 89 15:02:28 GMT
References: <1989Oct17.203733.23121@utzoo.uucp> <14091@lanl.gov>
Reply-To: peter@ficc.uu.net (Peter da Silva)
Organization: Xenix Support, FICC
Lines: 31

OK, what is the order of argument evaluation in Fortran?

That is, if I do:

	INTEGER FUNCTION RAND(NEWSEED)
	INTEGER SEED
	INTEGER NEWSEED

	IF ( NEWSEED .EQ. 0 ) THEN
	   ... code to generate new random number ...
	   SEED  = ... whatever ...
	ELSE
	   SEED = NEWSEED
	ENDIF

	RAND = SEED

	END

And then:

	I = RAND(very carefully designed seed)
	CALL HOOPY(RAND(0), RAND(0), RAND(0))

Will this program produce the same output on different machines? Is this
guaranteed?
-- 
Peter da Silva, *NIX support guy @ Ferranti International Controls Corporation.
Biz: peter@ficc.uu.net, +1 713 274 5180. Fun: peter@sugar.hackercorp.com. `-_-'
"You can tell when a USENET discussion is getting old when one of the      'U`
 participants drags out Hitler and the Nazis" -- Richard Sexton