summaryrefslogtreecommitdiff
path: root/src/wctype/iswupper.c
blob: 7c9faa9c3eccf134091edf9437cf8fb1ec2a57ee (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
#include <wctype.h>
#include <wchar.h>
#include "_wctype.h"

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

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

__check_1(int, 0, iswupper, wint_t)

/***
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)
*/