Commit | Line | Data |
---|---|---|
fa10a0f9 | 1 | /* |
161423a6 RE |
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. | |
fa10a0f9 | 5 | * |
60fce068 | 6 | * @(#)f_errlist.c 5.2 %G% |
161423a6 RE |
7 | */ |
8 | ||
9 | /* | |
fa10a0f9 DW |
10 | * f77 I/O error messages |
11 | */ | |
12 | ||
f560ed9e | 13 | char *f_errlist[] = |
fa10a0f9 DW |
14 | { |
15 | /* 100 */ "error in format", | |
16 | /* 101 */ "illegal unit number", | |
0a2fe9a6 DL |
17 | /* 102 */ "formatted i/o not allowed", |
18 | /* 103 */ "unformatted i/o not allowed", | |
19 | /* 104 */ "direct i/o not allowed", | |
20 | /* 105 */ "sequential i/o not allowed", | |
fa10a0f9 DW |
21 | /* 106 */ "can't backspace file", |
22 | /* 107 */ "off beginning of record", | |
23 | /* 108 */ "can't stat file", | |
24 | /* 109 */ "no * after repeat count", | |
25 | /* 110 */ "off end of record", | |
26 | /* 111 */ "truncation failed", | |
27 | /* 112 */ "incomprehensible list input", | |
28 | /* 113 */ "out of free space", | |
29 | /* 114 */ "unit not connected", | |
05b60b8b | 30 | /* 115 */ "invalid data for integer format term", |
0a2fe9a6 | 31 | /* 116 */ "invalid data for logical format term", |
fa10a0f9 DW |
32 | /* 117 */ "'new' file exists", |
33 | /* 118 */ "can't find 'old' file", | |
13ca6a24 | 34 | /* 119 */ "opening too many files or unknown system error", |
fa10a0f9 DW |
35 | /* 120 */ "requires seek ability", |
36 | /* 121 */ "illegal argument", | |
37 | /* 122 */ "negative repeat count", | |
8d1c22d2 | 38 | /* 123 */ "illegal operation for unit", |
05b60b8b | 39 | /* 124 */ "invalid data for d,e,f, or g format term", |
60fce068 | 40 | /* 125 */ "illegal input for namelist", |
fa10a0f9 DW |
41 | }; |
42 | ||
f560ed9e | 43 | int f_nerr = (sizeof(f_errlist)/sizeof(char *)); |