char id_perror[] = "@(#)perror_.c 1.2";
* write a standard error message to the standard error output
* string will be written preceeding the standard error message
#include "../libI77/fiodefs.h"
#include "../libI77/f_errno.h"
extern char *sys_errlist
[];
extern char *f_errlist
[];
while (len
> 0 && *--mesg
== ' ')
if (errno
>=0 && errno
< sys_nerr
)
mesg
= sys_errlist
[errno
];
else if (errno
>= F_ER
&& errno
< (F_ER
+ f_nerr
))
mesg
= f_errlist
[errno
- F_ER
];
sprintf(buf
, "%d: unknown error number", errno
);
fprintf(lu
->ufd
, ": %s\n", mesg
);