12762Sdlw /* 2*19916Slibs char id_f_errlist[] = "@(#)f_errlist.c 1.5"; 32762Sdlw * 42762Sdlw * f77 I/O error messages 52762Sdlw */ 62762Sdlw 72764Sdlw char *f_errlist[] = 82762Sdlw { 92762Sdlw /* 100 */ "error in format", 102762Sdlw /* 101 */ "illegal unit number", 112762Sdlw /* 102 */ "formatted io not allowed", 122762Sdlw /* 103 */ "unformatted io not allowed", 132762Sdlw /* 104 */ "direct io not allowed", 142762Sdlw /* 105 */ "sequential io 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", 252762Sdlw /* 116 */ "blank logical input field", 262762Sdlw /* 117 */ "'new' file exists", 272762Sdlw /* 118 */ "can't find 'old' file", 28*19916Slibs /* 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