/*
 * edlib v1.1 Copyright 1989 Edwin Hoogerbeets
 * This code is freely redistributable as long as no charge other than
 * reasonable copying fees are levied for it.
 */

/*
    string to upper changes all lower case letters in a string to upper
    case.
*/
#include <ctype.h>

char *stoupper(str)
register char *str;
{
    register char *temp = str;

    for ( ; *temp ; temp++ )
        *temp = (char) toupper(*temp);

    return(str);
}