github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-15 15:57:13 +00:00
Code Issues Projects Releases Wiki Activity

Rewrite perrno() so as not to rely on global error message array, rather using sterror()

Browse Source 
modified:   src/perrno.c
This commit is contained in:
Nick Briggs 2020-07-09 10:19:44 -07:00
parent 62b8f46405
commit 28f0087dfc
1 changed files with 2 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/perrno.c
View File

@ -17,6 +17,7 @@ static char *id = "$Id: perrno.c,v 1.4 2001/12/26 22:17:04 sybalsky Exp $ Copyri
#include "version.h"
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include "osmsg.h"
@ -28,24 +29,9 @@ static char *id = "$Id: perrno.c,v 1.4 2001/12/26 22:17:04 sybalsky Exp $ Copyri
/* */
/************************************************************************/
extern int errno;
#if defined(MACOSX) || defined(FREEBSD)
extern const char *const sys_errlist[];
extern const int sys_nerr;
#else
int sys_nerr;
#ifndef LINUX
extern char *sys_errlist[];
#endif /* LINUX */
#endif
void perrorn(char *s, int n) {
if (s != NULL && *s != '\0') { fprintf(stderr, "%s: ", s); }
if (n > 0 && n < sys_nerr) {
fprintf(stderr, "%s\n", sys_errlist[n]);
} else {
fprintf(stderr, "???\n");
}
fprintf(stderr, "%s\n", strerror(n));
}
/************************************************************************/