git: 9front

ref: 787e49e3e618f5c0077e4a5870d5a6c0b3614c06
dir: /sys/src/ape/lib/ap/stdio/perror.c/

View raw version 
/*
 * 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);
}