Return to rindex.c CVS log

Up to [Research Unix] / researchv9 / libc / gen

Annotation of researchv9/libc/gen/rindex.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Return the ptr in sp at which the character c last
                      3:  * appears; NULL if not found
                      4: */
                      5: 
                      6: #define NULL 0
                      7: 
                      8: char *
                      9: rindex(sp, c)
                     10: register char *sp, c;
                     11: {
                     12:        register char *r;
                     13: 
                     14:        r = NULL;
                     15:        do {
                     16:                if (*sp == c)
                     17:                        r = sp;
                     18:        } while (*sp++);
                     19:        return(r);
                     20: }

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