FORTRAN Reference Manual

Compiler Directives
FORTRAN Reference Manual—528615-001
10-49
MAP Compiler Directive
•
The run-time buffer pool provides space for edit control blocks (for programs that
run as NonStop processes), level-3 spooling buffers, saved messages, and
$RECEIVE tables. The amount of space specified or assumed by the
LOWBUFFER directive is in addition to the amounts specified or assumed by the
SAVE and RECEIVE directives.
•
For a FORTRAN program running as a NonStop process, the default buffer pool
size of 512 words allows you to have up to three EDIT format files open at a time,
since each requires 169 words for its edit control block. If you will have four or
more EDIT format files open at the same time, you must use the LOWBUFFER
directive to increase the buffer space to prevent a file system error 32, “unable to
obtain storage pool space,” during execution.
A program not that does not run as a NonStop process does not use space in this
area for EDIT format files because it allocates EDIT format file buffers in a
separate extended data segment, inaccessible to the FORTRAN program.
•
Each level-3 spooling output file requires a 512-word buffer in either this area or
the HIGHBUFFER area, unless a call to FORTRANSPOOLSTART explicitly
provides a buffer area for the file.
•
For additional information about buffer pools, see Section 12, Memory
Organization.
Example
?LOWBUFFER 1024
MAP Compiler Directive
The MAP directive instructs the compiler to list, following each program unit’s source
listing, a table of local identifiers for that program unit. MAP also lists a table of entities
in common storage following the last program unit’s listing.
The effect of the MAP directive is suspended, but not cancelled, by the NOLIST and
SUPPRESS directives.
The default value is MAP.
Considerations
Specify the MAP directive either with the FORTRAN command (following the
semicolon after the object file name) or in the source input file preceding the first
FORTRAN statement, or between the END line of one program unit and first
FORTRAN statement of the next program unit.
[NO]MAP