ref: 4cd2e7321078a1407a35ea4ea4c06583d80b2a0a
dir: /sys/src/ape/lib/ap/stdio/perror.c/
/*
* pANS stdio -- perror
*/
#include "iolib.h"
#include <errno.h>
void perror(const char *s){
if(s!=NULL && *s != '\0') fputs(s, stderr), fputs(": ", stderr);
fputs(strerror(errno), stderr);
putc('\n', stderr);
fflush(stderr);
}