summaryrefslogtreecommitdiff
path: root/src/wctype/iswupper.c
blob: b0c5cace5105bd9c4f6576e4f230e8ffe4342d64 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
#if 0

#include <wctype.h>
#include <wchar.h>
#include "_assert.h"

/** test whether a wide character is an uppercase letter **/
int iswupper(wint_t wc)
{
	ASSERT_REPRESENTABLE(wc, WCHAR_MIN, WCHAR_MAX, "wchar_t", WEOF);

	wctype_t upper = wctype("upper");
	return iswctype(wc, upper);
}

/***
The fn(iswupper) function tests whether arg(wc) is a wide character in the class
cclass(upper) in the current locale.
***/

/* RETURN(NZ): arg(wc) is an uppercase letter */
/* RETURN(0): arg(wc) is not an uppercase letter */

/* UNSPECIFIED: - */
/* IMPLEMENTATION: - */
/* LOCALE: LC_CTYPE */


/*
STDC(199409)
*/


#endif