P8000/WEGA/contrib/lcc/lib/libc/port/gen/strcspn.c

20 lines
369 B
C

/*
* Return the number of characters in the maximum leading segment
* of string which consists solely of characters NOT from charset.
*/
int
strcspn(string, charset)
char *string;
register char *charset;
{
register char *p, *q;
for(q=string; *q != '\0'; ++q) {
for(p=charset; *p != '\0' && *p != *q; ++p)
;
if(*p != '\0')
break;
}
return(q-string);
}