DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download
Index: T s

⟦f248c55ef⟧ TextFile

    Length: 666 (0x29a)
    Types: TextFile
    Names: »strcspn.c«

Derivation

└─⟦9ae75bfbd⟧ Bits:30007242 EUUGD3: Starter Kit
    └─⟦2fafebccf⟧ »EurOpenD3/mail/smail3.1.19.tar.Z« 
        └─⟦bcd2bc73f⟧ 
            └─⟦this⟧ »pd/strlib/strcspn.c«

TextFile

/* @(#)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;
}