date and time created 83/02/11 15:45:08 by rrh
[unix-history] / usr / src / usr.bin / f77 / libI77 / f_errno.h
CommitLineData
77c70b12 1/*
8d1c22d2 2char id_f_errno[] = "@(#)f_errno.h 1.5";
77c70b12
DW
3 *
4 * f77 I/O error definitions
5 */
6
1751b00e
DW
7#include <errno.h>
8
77c70b12 9extern int errno;
3d6b2f48 10extern int f_nerr;
77c70b12
DW
11
12#define F_ER 100 /* base offset of f77 error numbers */
13
14#define F_ERFMT 100 /* error in format */
15#define F_ERUNIT 101 /* illegal unit number */
16#define F_ERNOFIO 102 /* formatted io not allowed */
17#define F_ERNOUIO 103 /* unformatted io not allowed */
18#define F_ERNODIO 104 /* direct io not allowed */
19#define F_ERNOSIO 105 /* sequential io not allowed */
20#define F_ERNOBKSP 106 /* can't backspace file */
21#define F_ERBREC 107 /* off beginning of record */
22#define F_ERSTAT 108 /* can't stat file */
23#define F_ERREPT 109 /* no * after repeat count */
24#define F_EREREC 110 /* off end of record */
25#define F_ERTRUNC 111 /* truncation failed */
26#define F_ERLIO 112 /* incomprehensible list input */
27#define F_ERSPACE 113 /* out of free space */
28#define F_ERNOPEN 114 /* unit not connected */
29#define F_ERRDCHR 115 /* read unexpected character */
30#define F_ERLOGIF 116 /* blank logical input field */
31#define F_ERNEWF 117 /* 'new' file exists */
32#define F_EROLDF 118 /* can't find 'old' file */
33#define F_ERSYS 119 /* unknown system error */
34#define F_ERSEEK 120 /* requires seek ability */
35#define F_ERARG 121 /* illegal argument */
36#define F_ERNREP 122 /* negative repeat count */
8d1c22d2 37#define F_ERILLOP 123 /* illegal operation for channel or device */
3d6b2f48 38
4ab9c1f1 39#define F_MAXERR (f_nerr + F_ER)