summaryrefslogtreecommitdiff
path: root/src/ctype/isupper.c
blob: d0d58eaaf16e739a06b368fdbc94b6b25aac88d6 (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
#include <ctype.h>
#include "limits.h"
#include "nonstd/assert.h"
#include "_ctype.h"

/** test whether a character is an uppercase letter **/

int isupper(int c)
{
	unsigned int *map = __libc(CTYPE);

	ASSERT_REPRESENTABLE(c, 0, UCHAR_MAX, unsigned char, EOF);

	return map[c] & CT_UPPER;
}

/***
tests whether ARGUMENT(c) is a character in the class CHARACTER_CLASS(upper)
in the current locale.
***/

/*
RETURN(NONZERO, ARGUMENT(c) is an uppercase letter)
RETURN(0, ARGUMENT(c) is not an uppercase letter)
LC_CTYPE
C_LOCALE(`THIS() is true for the characters CHAR(A), CHAR(B), CHAR(C), CHAR(D), CHAR(E), CHAR(F), CHAR(G), CHAR(H), CHAR(I), CHAR(J), CHAR(K), CHAR(L), CHAR(M), CHAR(N), CHAR(O), CHAR(P), CHAR(Q), CHAR(S), CHAR(T), CHAR(U), CHAR(W), CHAR(X), CHAR(Y), and CHAR(Z)')
OTHER_LOCALES(`THIS() is true for a set of characters for which none of FUNCTION(iscntrl), FUNCTION(isdigit), FUNCTION(ispunct), or FUNCTION(isspace) is true')
STDC(1)
*/