1*47943Sbostic /*- 2*47943Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*47943Sbostic * All rights reserved. 42762Sdlw * 5*47943Sbostic * %sccs.include.proprietary.c% 623074Skre */ 723074Skre 8*47943Sbostic #ifndef lint 9*47943Sbostic static char sccsid[] = "@(#)f_errlist.c 5.3 (Berkeley) 04/12/91"; 10*47943Sbostic #endif /* not lint */ 11*47943Sbostic 1223074Skre /* 132762Sdlw * f77 I/O error messages 142762Sdlw */ 152762Sdlw 162764Sdlw char *f_errlist[] = 172762Sdlw { 182762Sdlw /* 100 */ "error in format", 192762Sdlw /* 101 */ "illegal unit number", 2022020Slibs /* 102 */ "formatted i/o not allowed", 2122020Slibs /* 103 */ "unformatted i/o not allowed", 2222020Slibs /* 104 */ "direct i/o not allowed", 2322020Slibs /* 105 */ "sequential i/o not allowed", 242762Sdlw /* 106 */ "can't backspace file", 252762Sdlw /* 107 */ "off beginning of record", 262762Sdlw /* 108 */ "can't stat file", 272762Sdlw /* 109 */ "no * after repeat count", 282762Sdlw /* 110 */ "off end of record", 292762Sdlw /* 111 */ "truncation failed", 302762Sdlw /* 112 */ "incomprehensible list input", 312762Sdlw /* 113 */ "out of free space", 322762Sdlw /* 114 */ "unit not connected", 3317973Slibs /* 115 */ "invalid data for integer format term", 3422020Slibs /* 116 */ "invalid data for logical format term", 352762Sdlw /* 117 */ "'new' file exists", 362762Sdlw /* 118 */ "can't find 'old' file", 3719916Slibs /* 119 */ "opening too many files or unknown system error", 382762Sdlw /* 120 */ "requires seek ability", 392762Sdlw /* 121 */ "illegal argument", 402762Sdlw /* 122 */ "negative repeat count", 4110223Sdlw /* 123 */ "illegal operation for unit", 4217973Slibs /* 124 */ "invalid data for d,e,f, or g format term", 4324101Sjerry /* 125 */ "illegal input for namelist", 442762Sdlw }; 452762Sdlw 462764Sdlw int f_nerr = (sizeof(f_errlist)/sizeof(char *)); 47