Return to ucase.c CVS log

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

coherent

/*
 * Convert a string to upper case.
 */
char *
ucase(s)
char *s;
{
	register char *p, c;

	for(p = s; c = *p; p++)
		if((c >= 'a') && (c <= 'z'))
			*p = c + 'A' - 'a';
	return(s);
}

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