1 /*
2  * strspn - find length of initial segment of s consisting entirely
3  * of characters from accept
4  */
5 
6 int
strspn(s,accept)7 strspn(s, accept)
8  char *s;
9  char *accept;
10 {
11 	register  char *sscan;
12 	register  char *ascan;
13 	register int count;
14 
15 	count = 0;
16 	for (sscan = s; *sscan != '\0'; sscan++) {
17 		for (ascan = accept; *ascan != '\0'; ascan++)
18 			if (*sscan == *ascan)
19 				break;
20 		if (*ascan == '\0')
21 			return(count);
22 		count++;
23 	}
24 	return(count);
25 }
26