home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / libg++-2.7.1-base.tgz / libg++-2.7.1-src.tar / fsf / libg++ / libio / ioperror.c < prev    next >
C/C++ Source or Header  |  1995-05-03  |  386b  |  23 lines

  1. #include "libioP.h"
  2. #include <errno.h>
  3. #include <string.h>
  4. #ifndef errno
  5. extern int errno;
  6. #endif
  7.  
  8. #ifndef _IO_strerror
  9. extern char* _IO_strerror __P((int));
  10. #endif
  11.  
  12. void
  13. DEFUN(_IO_perror, (s),
  14.       const char *s)
  15. {
  16.   char *error = _IO_strerror (errno);
  17.  
  18.   if (s != NULL && *s != '\0')
  19.     _IO_fprintf (_IO_stderr, "%s:", s);
  20.  
  21.   _IO_fprintf (_IO_stderr, "%s\n", error ? error : "");
  22. }
  23.