12762Sdlw /* 2*22020Slibs char id_f_errlist[] = "@(#)f_errlist.c 1.6"; 32762Sdlw * 42762Sdlw * f77 I/O error messages 52762Sdlw */ 62762Sdlw 72764Sdlw char *f_errlist[] = 82762Sdlw { 92762Sdlw /* 100 */ "error in format", 102762Sdlw /* 101 */ "illegal unit number", 11*22020Slibs /* 102 */ "formatted i/o not allowed", 12*22020Slibs /* 103 */ "unformatted i/o not allowed", 13*22020Slibs /* 104 */ "direct i/o not allowed", 14*22020Slibs /* 105 */ "sequential i/o not allowed", 152762Sdlw /* 106 */ "can't backspace file", 162762Sdlw /* 107 */ "off beginning of record", 172762Sdlw /* 108 */ "can't stat file", 182762Sdlw /* 109 */ "no * after repeat count", 192762Sdlw /* 110 */ "off end of record", 202762Sdlw /* 111 */ "truncation failed", 212762Sdlw /* 112 */ "incomprehensible list input", 222762Sdlw /* 113 */ "out of free space", 232762Sdlw /* 114 */ "unit not connected", 2417973Slibs /* 115 */ "invalid data for integer format term", 25*22020Slibs /* 116 */ "invalid data for logical format term", 262762Sdlw /* 117 */ "'new' file exists", 272762Sdlw /* 118 */ "can't find 'old' file", 2819916Slibs /* 119 */ "opening too many files or unknown system error", 292762Sdlw /* 120 */ "requires seek ability", 302762Sdlw /* 121 */ "illegal argument", 312762Sdlw /* 122 */ "negative repeat count", 3210223Sdlw /* 123 */ "illegal operation for unit", 3317973Slibs /* 124 */ "invalid data for d,e,f, or g format term", 342762Sdlw }; 352762Sdlw 362764Sdlw int f_nerr = (sizeof(f_errlist)/sizeof(char *)); 37