|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T s
Length: 666 (0x29a)
Types: TextFile
Names: »strcspn.c«
└─⟦9ae75bfbd⟧ Bits:30007242 EUUGD3: Starter Kit
└─⟦2fafebccf⟧ »EurOpenD3/mail/smail3.1.19.tar.Z«
└─⟦bcd2bc73f⟧
└─⟦this⟧ »pd/strlib/strcspn.c«
/* @(#)strcspn.c 1.1 5/9/88 06:52:12 */
/*
* File : strcspn.c
* Author : Richard A. O'Keefe.
* Updated: 11 April 1984
* Defines: strspn()
*
* strcspn(s1, s2) returns the length of the longest prefix of s1
* consisting entirely of characters which are NOT in s2 ("c" is
* "complement"). NUL is considered to be part of s2. As _str2set
* will never include NUL in a set, we have to check for it explicitly.
*/
#include "strings.h"
#include "_str2set.h"
int strcspn(str, set)
register _char_ *str;
char *set;
{
register int L;
_str2set(set);
for (L = 0; *str && _set_vec[*str++] != _set_ctr; L++) ;
return L;
}