Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 9/08/2022
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

GERROR

Run-Time Subroutine: Returns a message for the last error detected by a Fortran run-time 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

See Also