Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!uunet!zephyr.ens.tek.com!uw-beaver!milton!seymour
From: seymour@milton.u.washington.edu (Richard Seymour)
Newsgroups: comp.lang.fortran
Subject: Re: integer variable format address
Message-ID: <17839@milton.u.washington.edu>
Date: 6 Mar 91 19:42:14 GMT
References: <6769@idunno.Princeton.EDU> <RN.212@mts.ucs.UAlberta.CA> <1991Mar6.183820.8807@bellcore.bellcore.com>
Organization: University of Washington, Seattle
Lines: 21

on ASSIGN versus = (or Parameter)
In article <1991Mar6.183820.8807@bellcore.bellcore.com> dph@breeze.UUCP (Daniel P Heyman) writes:
>>>        integer k
>>>        k=1
>>>        write(1,k)
>>> 1      format('here is line 1')
>>>        end
>I used the parameter statement and got the program to run.
>	parameter(k=1)
This is all probably quite system-dependant (the standard says what it 
looks like at the source level, it doesn't state what goes on behind
the curtain (except for array storage))

back in the old days (before compilers got too smart) i used to try:
    ASSIGN 1 to K
    TYPE *,K

and (depending upon the system) i'd sometimes get "1", other times i'd
get the physical/virtual address of statement 1 in the code.
(DEC's PDP-11 RSX-11M Fortran 4-Plus did the latter)
--dick