Subversion Repositories Kolibri OS

Rev

Rev 647 | Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. #include <string.h>
  2.  
  3. char* strtok(char* s,const char* delim)
  4. // non reentrant
  5. {
  6.     static char* savep;
  7.     char* res;
  8.  
  9.     if(s)
  10.         savep = NULL;
  11.     else
  12.         s = savep;
  13.  
  14.     if (*s == '\0')
  15.         return NULL;
  16.         s += strspn(s, delim);
  17.         if (*s == '\0')
  18.                 return NULL;
  19.         res = s;
  20.         s += strcspn(s, delim);
  21.         savep = s + 1;
  22.         *s = '\0';
  23.         return res;
  24. }
  25.  
  26.