forked from KolibriOS/kolibrios
47 lines
716 B
C
47 lines
716 B
C
/*
|
|
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;
|
|
}
|