50 lines
660 B
C
50 lines
660 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 characters in the string at <[a]> to
|
||
|
upper case.
|
||
|
|
||
|
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 *
|
||
|
strupr (a)
|
||
|
char *a;
|
||
|
{
|
||
|
char *ret = a;
|
||
|
|
||
|
while (*a != '\0')
|
||
|
{
|
||
|
if (islower (*a))
|
||
|
*a = toupper (*a);
|
||
|
++a;
|
||
|
}
|
||
|
|
||
|
return ret;
|
||
|
}
|