Purpose
Returns the address of X that can then be used to define an integer POINTER.
Class
Inquiry function
Argument type and attributes
- X
- The data object whose address you want to find. The corresponding
actual argument must not be an undefined or disassociated pointer
or a parameter.
If the actual argument is an array, it must be contiguous.
If the actual
argument is a zero-sized array, it must be storage associated with
a non-zero-sized storage sequence. If the actual argument is an array
section, the storage of the array section must be contiguous.
Result type and attributes
The result is of type INTEGER(4) in 32-bit mode and of type INTEGER(8) in 64-bit mode.
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