xref: /plan9/sys/src/ape/lib/ap/stdio/perror.c (revision 7dd7cddf99dd7472612f1413b4da293630e6b1bc)
13e12c5d1SDavid du Colombier /*
23e12c5d1SDavid du Colombier  * pANS stdio -- perror
33e12c5d1SDavid du Colombier  */
43e12c5d1SDavid du Colombier #include "iolib.h"
perror(const char * s)53e12c5d1SDavid du Colombier void perror(const char *s){
63e12c5d1SDavid du Colombier 	extern int errno;
7*7dd7cddfSDavid du Colombier 	if(s!=NULL && *s != '\0') fputs(s, stderr), fputs(": ", stderr);
83e12c5d1SDavid du Colombier 	fputs(strerror(errno), stderr);
93e12c5d1SDavid du Colombier 	putc('\n', stderr);
103e12c5d1SDavid du Colombier 	fflush(stderr);
113e12c5d1SDavid du Colombier }
12