home *** CD-ROM | disk | FTP | other *** search
/ back2roots/padua / padua.7z / padua / uucp / duucp-1.17 / AU-117b4-src.lha / src / lib / stpchr.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-12-24  |  283 b   |  27 lines
  1. /*
  2.  *  STPCHR.C
  3.  */
  4.  
  5. #include <stdio.h>
  6. #include "config.h"
  7.  
  8. Prototype const char *stpchr (const char *, char);
  9.  
  10. const char *
  11. stpchr (const char *str, char c)
  12. {
  13.     char
  14.         cc;
  15.  
  16.     while (cc = *str) {
  17.         if (cc == c)
  18.             return str;
  19.         ++str;
  20.     }
  21.  
  22.     if (cc == c)
  23.         return str;
  24.  
  25.     return NULL;
  26. }
  27.