XL Fortran for AIX 8.1

Language Reference

+-------------------------------IBM Extension--------------------------------+


ABORT()

Terminates the program. It truncates all open output files to the current position of the file pointer, closes all open files, and sends the SIGIOT signal to the current process.

If the SIGIOT is neither caught nor ignored, and if the current directory is writable, the system produces a core file in the current directory.

Class

Subroutine

Examples

The following is an example of a statement using the ABORT subroutine.

IF (ERROR_CONDITION) CALL ABORT

The following is the output generated by the above program:

 /home/mark
IOT/Abort trap(coredump)

+----------------------------End of IBM Extension----------------------------+


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]