PERROR(3F)PERROR(3F)NAME
perror, gerror, ierrno - get system error messages
DESCRIPTION
perror — write a message to FORTRAN logical unit 0
The message is for the last detected system error.
string is a character input argument.
It is written preceding the standard error message.
Example 1: perror:
...
CALL perror ( "file is for formated I/O" )
...
gerror — return system error message
string is a character output argument.
Example 2: gerror, used as a subroutine:
CHARACTER string*30
...
CALL gerror ( string )
WRITE(*,*) string
END
Example 3: gerror, used as a function; in this case, string is not
used:
CHARACTER gerror*30, z*30
...
z = gerror( )
WRITE(*,*) z
END
ierrno — return the error number of the last detected system error
This number is updated only when an error actually occurs. Most
routines that might generate such errors return an error code
after the call; that value is a more reliable indicator of what
caused the error condition.
Example 4: ierrno:
INTEGER ierrno, n
...
n = ierrno ( )
WRITE(*,*) n
END
FILES
libfui.a
SEE ALSOintro(2), perror(3)RESTRICTIONS
string in the call to perror cannot be longer than 127 characters.
The length of the string returned by gerror is determined by the call‐
ing program. parameter
03/02/25 PERROR(3F)