1 /* 2 * Copyright (c) 1980 Regents of the University of California. 3 * All rights reserved. The Berkeley software License Agreement 4 * specifies the terms and conditions for redistribution. 5 * 6 * @(#)f_errno.h 5.2 (Berkeley) 07/30/85 7 */ 8 9 /* 10 * f77 I/O error definitions 11 */ 12 13 #include <errno.h> 14 15 extern int errno; 16 extern int f_nerr; 17 18 #define F_ER 100 /* base offset of f77 error numbers */ 19 20 #define F_ERFMT 100 /* error in format */ 21 #define F_ERUNIT 101 /* illegal unit number */ 22 #define F_ERNOFIO 102 /* formatted i/o not allowed */ 23 #define F_ERNOUIO 103 /* unformatted i/o not allowed */ 24 #define F_ERNODIO 104 /* direct i/o not allowed */ 25 #define F_ERNOSIO 105 /* sequential i/o not allowed */ 26 #define F_ERNOBKSP 106 /* can't backspace file */ 27 #define F_ERBREC 107 /* off beginning of record */ 28 #define F_ERSTAT 108 /* can't stat file */ 29 #define F_ERREPT 109 /* no * after repeat count */ 30 #define F_EREREC 110 /* off end of record */ 31 #define F_ERTRUNC 111 /* truncation failed */ 32 #define F_ERLIO 112 /* incomprehensible list input */ 33 #define F_ERSPACE 113 /* out of free space */ 34 #define F_ERNOPEN 114 /* unit not connected */ 35 #define F_ERRICHR 115 /* invalid data for integer format term */ 36 #define F_ERLOGIF 116 /* invalid data for logical format term */ 37 #define F_ERNEWF 117 /* 'new' file exists */ 38 #define F_EROLDF 118 /* can't find 'old' file */ 39 #define F_ERSYS 119 /* opening too many files or unknown system error */ 40 #define F_ERSEEK 120 /* requires seek ability */ 41 #define F_ERARG 121 /* illegal argument */ 42 #define F_ERNREP 122 /* negative repeat count */ 43 #define F_ERILLOP 123 /* illegal operation for channel or device */ 44 #define F_ERRFCHR 124 /* invalid data for d,e,f, or g format term */ 45 #define F_ERNMLIST 125 /* illegal input for namelist */ 46 47 #define F_MAXERR (f_nerr + F_ER) 48