Re: Address of a fortran variable

From: "John H. Lindsay" <jlin_DELETE_THIS_SPAM_ZOT_dsay@xxxxxxxxxxxx>
Date: Fri, 17 Oct 2008 13:40:20 -0400

David Flower wrote:
......

Many compilers support LOC, where LOC(X) returns the address of X. It
is not standard, despite having been around in FORTRAN for a very long
time.

......

True, and of those, several F77's &c. also had ALOC(X), usually a second
name for the same entry point in an (external) assembly-coded library
routine to avoid a few 'problems' with assumed data type. The one I was
very familiar with, the code (the same entry point and instructions for
both LOC and ALOC) loaded the address of the X into both the register
where INTEGER and LOGICAL results were returned and into another
register where REAL, dp and part of COMPLEX & dp COMPLEX results were
returned, so that no matter what data types were specified for LOC and
ALOC, reasonable results were returned.

Ah, history! ATB,

John.
.

References:
- Address of a fortran variable
  - From: Sibi
- Re: Address of a fortran variable
  - From: David Flower

Prev by Date: Re: chop the space after a string
Next by Date: Re: Address of a fortran variable
Previous by thread: Re: Address of a fortran variable
Next by thread: How to read an ANSIC file like this?
Index(es):
- Date
- Thread

Relevant Pages

Re: Should my internal NIC on DNS server be enabled for "
... > when you said the DC will register its addresses in the zone with the ... Data type: REG_SZ ... Specify the Internet Protocol address of the internal ...
(microsoft.public.windows.server.dns)
Re: which object orient language is most suitable for embedded programming?
... arguments and choose a data type that can represent them. ... Usually a full width register is part of an indexing expression, ... a zero extend instruction instruction ... However, with the enum 16 or 32 bit wide, the enum value could ...
(comp.arch.embedded)
Re: which object orient language is most suitable for embedded programming?
... arguments and choose a data type that can represent them. ... Usually a full width register is part of an indexing expression, ... a zero extend instruction instruction ... However, with the enum 16 or 32 bit wide, the enum value could ...
(comp.arch.embedded)
Re: data type of size 64 bits on a 32 bit processor
... how we can have a data type of 64 bits on a 32 bit ... if the compiler claims to be able to store x in a register then I think you'd have legitimate grounds for complaint. ... Free games and programming goodies. ...
(comp.lang.c)