home *** CD-ROM | disk | FTP | other *** search
/ Resource for Source: C/C++ / Resource for Source - C-C++.iso / codelib8 / v_10_12 / 1012018d < prev    next >
Encoding:
Text File  |  1995-11-01  |  497 b   |  25 lines
  1. /* strtok function */
  2. #include <string.h>
  3.  
  4. char *(strtok)(char *s1, const char *s2)
  5.     {    /* find next token in s1[] delimited by s2[] */
  6.     char *sbegin, *send;
  7.     static char *ssave = "";    /* for safety */
  8.  
  9.     sbegin = s1 ? s1 : ssave;
  10.     sbegin += strspn(sbegin, s2);
  11.     if (*sbegin == '\0')
  12.         {    /* end of scan */
  13.         ssave = "";                /* for safety */
  14.         return (NULL);
  15.         }
  16.     send = sbegin + strcspn(sbegin, s2);
  17.     if (*send != '\0')
  18.         *send++ = '\0';
  19.     ssave = send;
  20.     return (sbegin);
  21.     }
  22.  
  23.  
  24.  
  25.