home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Mint / mntlib25.zoo / strspn.c < prev    next >
C/C++ Source or Header  |  1992-09-17  |  548b  |  29 lines
  1. /* from Henry Spencer's stringlib */
  2. #include <string.h>
  3.  
  4. /*
  5.  * strspn - find length of initial segment of s consisting entirely
  6.  * of characters from accept
  7.  */
  8.  
  9. size_t
  10. strspn(s, accept)
  11. const char *s;
  12. const char *accept;
  13. {
  14.     register const char *sscan;
  15.     register const char *ascan;
  16.     register size_t count;
  17.  
  18.     count = 0;
  19.     for (sscan = s; *sscan != '\0'; sscan++) {
  20.         for (ascan = accept; *ascan != '\0'; ascan++)
  21.             if (*sscan == *ascan)
  22.                 break;
  23.         if (*ascan == '\0')
  24.             return(count);
  25.         count++;
  26.     }
  27.     return(count);
  28. }
  29.