ABORT

Portability Subroutine: Flushes and closes I/O buffers, and terminates program execution.

Module: USE DFPORT

Syntax

CALL ABORT [string]

string
(Input; optional) Character*(*). Allows you to specify an abort message at program termination. When ABORT is called, "abort:" is written to external unit 0, followed by string. If omitted, the default message written to external unit 0 is "abort: Fortran Abort Called."

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

See Also: EXIT, STOP

Example

!The following prints "abort: Fortran Abort Called"
CALL ABORT

!The following prints "abort: Out of here!"
Call ABORT ("Out of here!")