1*47943Sbostic /*- 2*47943Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*47943Sbostic * All rights reserved. 42505Sdlw * 5*47943Sbostic * %sccs.include.proprietary.c% 6*47943Sbostic * 7*47943Sbostic * @(#)f_errno.h 5.3 (Berkeley) 04/12/91 823057Skre */ 923057Skre 1023057Skre /* 112505Sdlw * f77 I/O error definitions 122505Sdlw */ 132505Sdlw 142515Sdlw #include <errno.h> 152515Sdlw 162505Sdlw extern int errno; 172763Sdlw extern int f_nerr; 182505Sdlw 192505Sdlw #define F_ER 100 /* base offset of f77 error numbers */ 202505Sdlw 212505Sdlw #define F_ERFMT 100 /* error in format */ 222505Sdlw #define F_ERUNIT 101 /* illegal unit number */ 2322020Slibs #define F_ERNOFIO 102 /* formatted i/o not allowed */ 2422020Slibs #define F_ERNOUIO 103 /* unformatted i/o not allowed */ 2522020Slibs #define F_ERNODIO 104 /* direct i/o not allowed */ 2622020Slibs #define F_ERNOSIO 105 /* sequential i/o not allowed */ 272505Sdlw #define F_ERNOBKSP 106 /* can't backspace file */ 282505Sdlw #define F_ERBREC 107 /* off beginning of record */ 292505Sdlw #define F_ERSTAT 108 /* can't stat file */ 302505Sdlw #define F_ERREPT 109 /* no * after repeat count */ 312505Sdlw #define F_EREREC 110 /* off end of record */ 322505Sdlw #define F_ERTRUNC 111 /* truncation failed */ 332505Sdlw #define F_ERLIO 112 /* incomprehensible list input */ 342505Sdlw #define F_ERSPACE 113 /* out of free space */ 352505Sdlw #define F_ERNOPEN 114 /* unit not connected */ 3617974Slibs #define F_ERRICHR 115 /* invalid data for integer format term */ 3722020Slibs #define F_ERLOGIF 116 /* invalid data for logical format term */ 382505Sdlw #define F_ERNEWF 117 /* 'new' file exists */ 392505Sdlw #define F_EROLDF 118 /* can't find 'old' file */ 4019916Slibs #define F_ERSYS 119 /* opening too many files or unknown system error */ 412505Sdlw #define F_ERSEEK 120 /* requires seek ability */ 422505Sdlw #define F_ERARG 121 /* illegal argument */ 432505Sdlw #define F_ERNREP 122 /* negative repeat count */ 4410222Sdlw #define F_ERILLOP 123 /* illegal operation for channel or device */ 4517974Slibs #define F_ERRFCHR 124 /* invalid data for d,e,f, or g format term */ 4624101Sjerry #define F_ERNMLIST 125 /* illegal input for namelist */ 472763Sdlw 482766Sdlw #define F_MAXERR (f_nerr + F_ER) 49