ABORT() (IBM extension)

Purpose

Terminates the program abnormally, unless the signal SIGABRT is being caught and the signal handler does not return. It truncates all open output files to the current position of the file pointer, closes all open files, and then calls the abort() system routine. This results in a SIGABRT signal sent to the current process.

The ABORT intrinsic overrides blocking or ignoring the SIGABRT signal; it will not return.

Class

Subroutine

Examples

The following is an example of a statement using the ABORT subroutine.
IF (ERROR_CONDITION) CALL ABORT