Return to ucase.c CVS log

Up to [MW Coherent from dump] / coherent / a / usr / src / misc

Annotation of coherent/a/usr/src/misc/ucase.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Convert a string to upper case.
        !             3:  */
        !             4: char *
        !             5: ucase(s)
        !             6: char *s;
        !             7: {
        !             8:        register char *p, c;
        !             9: 
        !            10:        for(p = s; c = *p; p++)
        !            11:                if((c >= 'a') && (c <= 'z'))
        !            12:                        *p = c + 'A' - 'a';
        !            13:        return(s);
        !            14: }

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