Return to strpbrk.c CVS log

Up to [Research Unix] / researchv10no / cmd / prefer / libux3

Annotation of researchv10no/cmd/prefer/libux3/strpbrk.c, revision 1.1

1.1     ! root        1: /*LINTLIBRARY*/
        !             2: /*
        !             3:  * Return ptr to first occurance of any character from `brkset'
        !             4:  * in the character string `string'; NULL if none exists.
        !             5:  */
        !             6: 
        !             7: #define        NULL    (char *) 0
        !             8: 
        !             9: char *
        !            10: strpbrk(string, brkset)
        !            11: char *string, *brkset;
        !            12: {
        !            13:        register char *p;
        !            14: 
        !            15:        do {
        !            16:                for(p=brkset; *p != '\0' && *p != *string; ++p)
        !            17:                        ;
        !            18:                if(*p != '\0')
        !            19:                        return(string);
        !            20:        }
        !            21:        while(*string++);
        !            22:        return(NULL);
        !            23: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.