%VAL

Built-in Function: Changes the form of an actual argument. Passes the argument as an immediate value.

%VAL (a)

a	(Input) An expression, record name, procedure name, array, character array section, or array element.

Description

The argument is passed as follows:

On IA-32 architecture, as a 32-bit immediate value. If the argument is integer (or logical) and shorter than 32 bits, it is sign-extended to a 32-bit value. For complex data types, %VAL passes two 32-bit arguments.
On Intel® 64 architecture, as a 64-bit immediate value. If the argument is integer (or logical) and shorter than 64 bits, it is sign-extended to a 64-bit value. For complex data types, %VAL passes two 64-bit arguments.

You must specify %VAL in the actual argument list of a CALL statement or function reference. You cannot use it in any other context.

The following tables list the Intel® Fortran defaults for argument passing, and the allowed uses of %VAL:

Expressions
Actual Argument Data Type	Default	%VAL
Logical	REF	Yes¹
Integer	REF	Yes¹
REAL(4)	REF	Yes
REAL(8)	REF	No
REAL(16)	REF	No
COMPLEX(4)	REF	Yes
COMPLEX(8)	REF	Yes
COMPLEX(16)	REF	No
Character	See table note ²	No
Hollerith	REF	No
Aggregate³	REF	No
Derived	REF	No

Array Name
Actual Argument Data Type	Default	%VAL
Numeric	REF	No
Character	See table note ²	No
Aggregate³	REF	No
Derived	REF	No

Procedure Name
Actual Argument Data Type	Default	%VAL
Numeric	REF	No
Character	See table note ²	No

¹ If a logical or integer value occupies less than 64 bits of storage on Intel® 64 architecture, or 32 bits of storage on IA-32 architecture, it is converted to the correct size by sign extension. Use the ZEXT intrinsic function if zero extension is desired.

² A character argument is passed by address and hidden length.

³ In Intel® Fortran record structures

The %VAL and %REF functions override related !DIR$ ATTRIBUTE settings.

Example

  CALL SUB(2, %VAL(2))

Constant 2 is passed by reference. The second constant 2 is passed by immediate value.

%VAL

Description

Example

See Also