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

libfsu.a

See Also

intro(2), perror(3F)

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 calling program.