ack/lang/cem/libcc/gen/strcspn.c
1987-03-31 10:45:53 +00:00

15 lines
234 B
C

/* $Header$ */
int
strcspn(string, notin)
char *string;
char *notin;
{
register char *s1, *s2;
for (s1 = string; *s1; s1++) {
for(s2 = notin; *s2 != *s1 && *s2; s2++) /* nothing */ ;
if (*s2) break;
}
return s1 - string;
}