Purpose
Returns the address of X that can then be used to define an integer POINTER.
Class
Inquiry function
Argument type and attributes
- X
- is the data object whose address you want to find. It must not
be an undefined or disassociated pointer or a parameter.
If it
is an array, it must be contiguous.
If it is a zero-sized array, it must
be storage associated with a non-zero-sized storage sequence. If it
is an array section, the storage of the array section must be contiguous.
Result type and attributes
In 64-bit compilation mode, the result is of type INTEGER(8).
Result value
The result is the address of the data object, or, if X is a pointer, the address of the associated target. The result is undefined if the argument is not valid.
Examples
INTEGER A,B
POINTER (P,I)
P=LOC(A)
P=LOC(B)
END