Commit | Line | Data |
---|---|---|
fa10a0f9 | 1 | /* |
f560ed9e | 2 | char id_f_errlist[] = "@(#)f_errlist.c 1.2"; |
fa10a0f9 DW |
3 | * |
4 | * f77 I/O error messages | |
5 | */ | |
6 | ||
f560ed9e | 7 | char *f_errlist[] = |
fa10a0f9 DW |
8 | { |
9 | /* 100 */ "error in format", | |
10 | /* 101 */ "illegal unit number", | |
11 | /* 102 */ "formatted io not allowed", | |
12 | /* 103 */ "unformatted io not allowed", | |
13 | /* 104 */ "direct io not allowed", | |
14 | /* 105 */ "sequential io not allowed", | |
15 | /* 106 */ "can't backspace file", | |
16 | /* 107 */ "off beginning of record", | |
17 | /* 108 */ "can't stat file", | |
18 | /* 109 */ "no * after repeat count", | |
19 | /* 110 */ "off end of record", | |
20 | /* 111 */ "truncation failed", | |
21 | /* 112 */ "incomprehensible list input", | |
22 | /* 113 */ "out of free space", | |
23 | /* 114 */ "unit not connected", | |
24 | /* 115 */ "read unexpected character", | |
25 | /* 116 */ "blank logical input field", | |
26 | /* 117 */ "'new' file exists", | |
27 | /* 118 */ "can't find 'old' file", | |
28 | /* 119 */ "unknown system error", | |
29 | /* 120 */ "requires seek ability", | |
30 | /* 121 */ "illegal argument", | |
31 | /* 122 */ "negative repeat count", | |
32 | }; | |
33 | ||
f560ed9e | 34 | int f_nerr = (sizeof(f_errlist)/sizeof(char *)); |