Lahey/Fujitsu Fortran

Utility Procedures

All procedures shown in this table are nonstandard.

Utility Procedures

Name

Description

Class

CARG

Pass item to a procedure as a C data type by value. CARG can only be used as an actual argument.

Utility

Function

DLL_EXPORT

Specify which procedures should be available in a dynamic-link library.

Utility

Subroutine

DLL_IMPORT

Specify which procedures are to be imported from a dynamic-link library.

Utility

Subroutine

DVCHK

The initial invocation of the DVCHK subroutine masks the divide-by-zero interrupt on the floating-point unit. Subsequent invocations return true or false in the lflag variable if the exception has occurred or not occurred, respectively. DVCHK will not check or mask zero divided by zero. Use INVALOP to check for a zero divided by zero.

Utility

Subroutine

ERROR

Print a message to the console with a subprogram traceback, then continue processing.

Utility

Subroutine

EXIT

Terminate the program and set the DOS error level.

Utility

Subroutine

FLUSH

Empty the buffer for an input/output unit by writing to its corresponding file. Note that this does not flush the DOS file buffer.

Utility

Subroutine

GETCL

Get command line.

Utility

Subroutine

GETENV

Get the specified environment variable.

Utility

Function

INVALOP

The initial invocation of the INVALOP subroutine masks the invalid operator interrupt on the floating-point unit. Subsequent invocations return true or false in the lflag variable if the exception has occurred or not occurred, respectively.

Utility

Subroutine

IOSTAT_MSG

Get a runtime I/O error message then continue processing.

Utility

Subroutine

NDPERR

Report floating point exceptions.

Utility

Function

NDPEXC

Mask all floating point exceptions.

Utility

Subroutine

OFFSET

Get the DOS offset portion of the memory address of a variable, substring, array reference, or external subprogram.

Utility

Function

OVEFL

The initial invocation of the OVEFL subroutine masks the overflow interrupt on the floating-point unit. Subsequent invocations return true or false in the lflag variable if the exception has occurred or not occurred, respectively.

Utility

Subroutine

POINTER

Get the memory address of a variable, substring, array reference, or external subprogram.

Utility

Function

PRECFILL

Set fill character for numeric fields that are wider than supplied numeric precision. The default is '0'.

Utility

Subroutine

PROMPT

Set prompt for subsequent READ statements. Fortran default is no prompt.

Utility

Subroutine

SEGMENT

Get the DOS segment portion of the memory address of a variable, substring, array reference, or external subprogram.

Utility

Function

SYSTEM

Execute a DOS command as if from the DOS command line.

Utility

Subroutine

UNDFL

The initial invocation of the UNDFL subroutine masks the underflow interrupt on the floating-point unit. Subsequent invocations return true or false in the lflag variable if the exception has occurred or not occurred, respectively.

Utility

Subroutine

VAL

Pass an item to a procedure by value. VAL can only be used as an actual argument.

Utility

Function