kolibrios/programs/develop/ktcc/trunk/libc.obj/source/string/strcspn.c

18 lines
375 B
C
Raw Normal View History

/* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */
#include <string.h>
size_t strcspn(const char* s1, const char* s2)
{
const char *p, *spanp;
char c, sc;
for (p = s1;;) {
c = *p++;
spanp = s2;
do {
if ((sc = *spanp++) == c)
return p - 1 - s1;
} while (sc != 0);
}
}