source: vendor/gawk/3.1.5/missing_d/strerror.c@ 3076

Last change on this file since 3076 was 3076, checked in by bird, 19 years ago

gawk 3.1.5

File size: 1.1 KB
Line 
1/* strerror.c --- ANSI C compatible system error routine
2
3 Copyright (C) 1986, 1988, 1989, 1991 the Free Software Foundation, Inc.
4
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2, or (at your option)
8 any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software Foundation,
17 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
18
19#if 0
20#include <stdio.h>
21#endif
22
23extern int sys_nerr;
24extern char *sys_errlist[];
25
26char *
27strerror(n)
28int n;
29{
30 static char mesg[30];
31
32 if (n < 0 || n >= sys_nerr) {
33 sprintf(mesg, "Unknown error (%d)", n);
34 return mesg;
35 } else
36 return sys_errlist[n];
37}
Note: See TracBrowser for help on using the repository browser.