Subversion Repositories openrisc_2011-10-31

/*
FUNCTION
	<<strupr>>---force string to uppercase
 
INDEX
	strupr
 
ANSI_SYNOPSIS
	#include <string.h>
	char *strupr(char *<[a]>);
 
TRAD_SYNOPSIS
	#include <string.h>
	char *strupr(<[a]>)
	char *<[a]>;
 
DESCRIPTION
	<<strupr>> converts each character in the string at <[a]> to
	uppercase.
 
RETURNS
	<<strupr>> returns its argument, <[a]>.
 
PORTABILITY
<<strupr>> is not widely portable.
 
<<strupr>> requires no supporting OS subroutines.
 
QUICKREF
	strupr
*/
 
#include <string.h>
#include <ctype.h>
 
char *
_DEFUN (strupr, (s),
	char *s)
{
  unsigned char *ucs = (unsigned char *) s;
  for ( ; *ucs != '\0'; ucs++)
    {
      *ucs = toupper(*ucs);
    }
  return s;
}