EXIT — Exit the program with status.#

EXIT(STATUS)#

EXIT causes immediate termination of the program with status. If status is omitted it returns the canonical success for the system. All Fortran I/O units are closed.

Parameters

STATUS – Shall be an INTEGER of the default kind.

Returns

STATUS is passed to the parent process on exit.

Standard:

GNU extension

Class:

Subroutine

Syntax:
CALL EXIT([STATUS])
Example:
program test_exit
  integer :: STATUS = 0
  print *, 'This program is going to exit.'
  call EXIT(STATUS)
end program test_exit
See also:

ABORT — Abort the program, KILL — Send a signal to a process