FORTRAN Reference Manual

Compiler Directives
FORTRAN Reference Manual—528615-001
10-7
ANSI Compiler Directive
•
If you specify NOABORT and the compiler cannot open a SOURCE or CONSULT
file, the compiler displays the following on the home terminal:
File file-name not in directory.
Enter ?SAME to try same file.
Enter ?ABORT to abort compile.
Enter ?IGNORE to skip file.
Otherwise enter another file name.
Enter response:
If a file system error code (including EOF) is returned or you enter ?ABORT, the
compiler calls ABEND with completion code 3 (premature termination). If you enter
?SAME, or ?IGNORE, or a file name, the compiler proceeds as directed.
•
If FORTRAN is unable to open a SOURCE or CONSULT file, and an ABORT
directive is in effect, the compiler does not display a message on the home
terminal. Instead, it writes the following message to its OUT file and ABENDs with
completion code 3:
OPEN OF directive FILE FAILED
FILE MANAGEMENT ERROR # n: file-name
Example
?ABORT
ANSI Compiler Directive
The ANSI directive instructs the compiler to ignore characters beyond position 72 of a
source line and to pad each line that is shorter than 72 characters with blanks.
The default value is NOANSI.
Considerations
•
Specify ANSI if you need to conform to the ANSI standard line length. Note that the
ANSI directive affects only the length of source records read by the compiler. It has
no effect on other HP extensions to ANSI standard FORTRAN.
Line length can also be specified with the COLUMNS directive. For more
information, see the COLUMNS Compiler Directive on page 10-9.
•
If you omit this directive, the compiler reads all characters in a source line.
[NO]ANSI