Museum

Home

Lab Overview

Retrotechnology Articles

Online Manuals

⇒ gerror(3F) — Sun WorkShop 3.0.1

Media Vault

Software Library

Restoration Projects

Artifacts Sought

Related Articles

intro(2)

perror(3)

PERROR(3F)  —  FORTRAN LIBRARY ROUTINES

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 will be 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 and I/O statements 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

libF77.a

SEE ALSO

intro(2), perror(3)

BUGS

string in the call to perror can be no longer than 127 characters. 

The length of the string returned by gerror is determined by the calling program. 

NOTES

If the error code is greater than or equal to 1000, it is a f77 I/O error. 
If the error code is less than 1000, it is a system error.  See intro(2). The f77 I/O error codes and their meanings are:

1000“error in format”
1001“illegal unit number”
1002“formatted io not allowed”
1003“unformatted io not allowed”
1004“direct io not allowed”
1005“sequential io not allowed”
1006“can’t backspace file”
1007“off beginning of record”
1008“can’t stat file”
1009“no ∗ after repeat count”
1010“off end of record”
1011<not used>
1012“incomprehensible list input”
1013“out of free space”
1014“unit not connected”
1015“read unexpected character”
1016“illegal logical input field”
1017“’new’ file exists”
1018“can’t find ’old’ file”
1019“unknown system error”
1020“requires seek ability”
1021“illegal argument”
1022“negative repeat count”
1023“illegal operation for unit”
1024<not used>
1025“incompatible specifiers in open”
1026“illegal input for namelist”
1027“error in FILEOPT parameter”
1028“illegal i/o call”

Sun Release 4.1  —  Last change: 28 October 1991

Typewritten Software • bear@typewritten.org • Edmonds, WA 98026