Portability Subroutine: Flushes and closes I/O buffers, and terminates program execution.
USE IFPORT
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." |
This subroutine causes the program to terminate and an exit code value of 134 is returned to the program that launched it.
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
USE IFPORT
!The following prints "abort: Fortran Abort Called"
CALL ABORT
!The following prints "abort: Out of here!"
Call ABORT ("Out of here!")
Copyright © 1996-2010, Intel Corporation. All rights reserved.