Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference
A newer version of this document is available. Customers should click here to go to the newest version.
Visible to Intel only — GUID: GUID-48BBF71C-3B2A-419E-9265-1AFD7C794CB7
Visible to Intel only — GUID: GUID-48BBF71C-3B2A-419E-9265-1AFD7C794CB7
GERROR
Runtime Subroutine: Returns a message for the last error detected by a Fortran runtime routine.
Module
USE IFCORE
CALL GERROR (string)
string |
(Output) Character*(*). Message corresponding to the last detected error. |
The last detected error does not necessarily correspond to the most recent function call. The compiler resets string only when another error occurs.
Example
USE IFCORE character*40 errtext character char1 integer*4 iflag, i4 . . .!Open unit 1 here i4=fgetc(1,char1) if (i4) then iflag = 1 Call GERROR (errtext) print *, errtext end if