FORTRAN Reference Manual

Compiler Directives
FORTRAN Reference Manual—528615-001
10-35
ICODE Compiler Directive
°
If you specify ENV COMMON, and do not open $RECEIVE by explicitly calling
the OPEN system procedure. If your program specifies ENV COMMON,
FORTRAN opens $RECEIVE with FILE_OPEN_, regardless of the value of the
HIGHREQ directive.
•
If a process running at a high PIN attempts to open your process and your process
is running with NOHIGHREQ, the file system returns error code 560.
•
If you compile your program with both ENV OLD and HIGHREQ in effect, and your
program reads from $RECEIVE, the SOURCE specifier in the READ statement will
contain a CRTPID (creation timestamp process identifier) in SOURCE(5:8). You
can use the CRTPID only to compare it with the CRTPID specified in a CPU or
NODE status change message, or to compare it to the CRTPID returned to your
program when it received an OPEN system message from a requester.
If you need to use a process identification string in any other context, you must
specify ENV COMMON or NOHIGHREQ. If you specify ENV COMMON, the value
returned in the SOURCE array is a process handle, rather than a CRTPID. For
more information, see Section 14, Interprocess Communication. For more
information about CRTPIDs and process handles, see the Guardian Programmer’s
Guide.
•
NOHIGHREQ is the default value for this directive. If you specify HIGHREQ, you
might need to make changes in your program. For information about converting
your process to handle high-PIN requesters, see the Guardian Application
Conversion Guide.
Example
?HIGHREQUESTERS
ICODE Compiler Directive
The ICODE directive instructs the compiler to list the symbolic instruction codes it
generates for each program unit, following the source listing for that program unit. The
effect of the ICODE directive is suspended, but not cancelled, by the NOLIST and
SUPPRESS directives.
The default value is NOICODE.
Example
?LIST, ICODE
[NO]ICODE