:pserver:cvsanon@mok.lvcm.com:/CVS/ReactOS reactos
[reactos.git] / lib / msvcrt / wstring / wcsspn.c
1 #include <msvcrt/string.h>
2
3 size_t wcsspn(const wchar_t *str,const wchar_t *accept)
4 {
5         wchar_t  *s;
6         wchar_t  *t;
7         s=(wchar_t *)str;
8         do {
9                 t=(wchar_t *)accept;
10                 while (*t) { 
11                         if (*t==*s) 
12                                 break;
13                         t++;
14                 }
15                 if (!*t) 
16                         break;
17                 s++;
18         } while (*s);
19         return s-str; /* nr of wchars */
20 }