pd.if.org Git - pdclib/blob - functions/stdio/perror.c

   1 /* ----------------------------------------------------------------------------
   2  * $Id$
   3  * ----------------------------------------------------------------------------
   4  * Public Domain C Library - http://pdclib.sourceforge.net
   5  * This code is Public Domain. Use, modify, and redistribute at will.
   6  * --------------------------------------------------------------------------*/
   7
   8 void perror( const char * s ) { /* TODO */ };
   9
  10 /* PDPC code - unreviewed
  11 {
  12     if ((s != NULL) && (*s != '\0'))
  13     {
  14         printf("%s: ");
  15     }
  16     if (errno == 0)
  17     {
  18         printf("No error has occurred\n");
  19     }
  20     else
  21     {
  22         printf("An error has occurred\n");
  23     }
  24     return;
  25 }
  26 */