mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-12-24 23:56:49 +03:00
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;
|
||
|
}
|