static char *rcs = "$Header: shift.c,v 1.1 88/01/15 12:56:32 simpson Rel $";
/*
$Log:	shift.c,v $
 * Revision 1.1  88/01/15  12:56:32  simpson
 * initial release
 * 
 * Revision 0.1  87/12/11  17:14:10  simpson
 * beta test
 * 
*/
#include <ctype.h>

/*
 * Downshifts a string in place.
 */
char *string_downshift(s)
char *s;
{

	register char *x = s;
	for (; *x; x++)
		if (isupper(*x))
			*x = tolower(*x);
	return(s);
}

/*
 * Upshifts a string in place.
 */
char *string_upshift(s)
char *s;
{

	register char *x = s;
	for (; *x; x++)
		if (islower(*x))
			*x = toupper(*x);
	return(s);
}