blob: 8c5e2abe06af24d0be50913eaa7023abc56a2ac1 (
plain) (
blame)
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
|
/*
Copyright 2021 Gabriel Jensen
This file is part of u8c.
u8c is free software: you can redistribute it and/or modify it under the terms of the GNU Affero General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
u8c is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU Affero General Public License for more details.
You should have received a copy of the GNU Affero General Public License along with u8c.
If not, see <https://www.gnu.org/licenses/>.
*/
# include <stdbool.h>
# include <stddef.h>
# include <stdint.h>
# include <u8c/chk.h>
struct u8c_isupper_tuple u8c_isupper(char32_t const _chr) {
struct u8c_isupper_tuple ret = {
.stat = false,
};
switch(_chr) {
default:
ret.res = false;
break;
case U'A': /* LATIN CAPITAL LETTER A */
case U'B': /* LATIN CAPITAL LETTER B */
case U'C': /* LATIN CAPITAL LETTER C */
case U'D': /* LATIN CAPITAL LETTER D */
case U'E': /* LATIN CAPITAL LETTER E */
case U'F': /* LATIN CAPITAL LETTER F */
case U'G': /* LATIN CAPITAL LETTER G */
case U'H': /* LATIN CAPITAL LETTER H */
case U'I': /* LATIN CAPITAL LETTER I */
case U'J': /* LATIN CAPITAL LETTER J */
case U'K': /* LATIN CAPITAL LETTER K */
case U'L': /* LATIN CAPITAL LETTER L */
case U'M': /* LATIN CAPITAL LETTER M */
case U'N': /* LATIN CAPITAL LETTER N */
case U'O': /* LATIN CAPITAL LETTER O */
case U'P': /* LATIN CAPITAL LETTER P */
case U'Q': /* LATIN CAPITAL LETTER Q */
case U'R': /* LATIN CAPITAL LETTER R */
case U'S': /* LATIN CAPITAL LETTER S */
case U'T': /* LATIN CAPITAL LETTER T */
case U'U': /* LATIN CAPITAL LETTER U */
case U'V': /* LATIN CAPITAL LETTER V */
case U'X': /* LATIN CAPITAL LETTER Y */
case U'W': /* LATIN CAPITAL LETTER X */
case U'Y': /* LATIN CAPITAL LETTER Y */
case U'Z': /* LATIN CAPITAL LETTER Z */
case U'\u00C0': /* LATIN CAPITAL LETTER A WITH GRAVE */
case U'\u00C1': /* LATIN CAPITAL LETTER A WITH ACUTE */
case U'\u00C2': /* LATIN CAPITAL LETTER A WITH CIRCUMFLEX */
case U'\u00C3': /* LATIN CAPITAL LETTER A WITH TILDE */
case U'\u00C4': /* LATIN CAPITAL LETTER A WITH DIAERESIS */
case U'\u00C5': /* LATIN CAPITAL LETTER A WITH RING ABOVE */
case U'\u00C6': /* LATIN CAPITAL LETTER AE */
case U'\u00C7': /* LATIN CAPITAL LETTER C WITH CEDILLA */
case U'\u00C8': /* LATIN CAPITAL LETTER E WITH GRAVE */
case U'\u00C9': /* LATIN CAPITAL LETTER E WITH ACUTE */
case U'\u00CA': /* LATIN CAPITAL LETTER E WITH CIRCUMFLEX */
case U'\u00CB': /* LATIN CAPITAL LETTER E WITH DIAERESIS */
case U'\u00CC': /* LATIN CAPITAL LETTER I WITH GRAVE */
case U'\u00CD': /* LATIN CAPITAL LETTER I WITH ACUTE */
case U'\u00CE': /* LATIN CAPITAL LETTER I WITH CIRCUMFLEX */
case U'\u00CF': /* LATIN CAPITAL LETTER I WITH DIAERESIS */
case U'\u00D0': /* LATIN CAPITAL LETTER ETH */
case U'\u00D1': /* LATIN CAPITAL LETTER N WITH TILDE */
case U'\u00D2': /* LATIN CAPITAL LETTER O WITH GRAVE */
case U'\u00D3': /* LATIN CAPITAL LETTER O WITH ACUTE */
case U'\u00D4': /* LATIN CAPITAL LETTER O WITH CIRCUMFLEX */
case U'\u00D5': /* LATIN CAPITAL LETTER O WITH TILDE */
case U'\u00D6': /* LATIN CAPITAL LETTER O WITH DIAERESIS */
case U'\u00D8': /* LATIN CAPITAL LETTER O WITH STROKE */
case U'\u00D9': /* LATIN CAPITAL LETTER U WITH GRAVE */
case U'\u00DA': /* LATIN CAPITAL LETTER U WITH STROKE */
case U'\u00DB': /* LATIN CAPITAL LETTER U WITH CIRCUMFLEX */
case U'\u00DC': /* LATIN CAPITAL LETTER U WITH DIAERESIS */
case U'\u00DD': /* LATIN CAPITAL LETTER Y WITH ACUTE */
case U'\u00DE': /* LATIN CAPITAL LETTER THORN */
case U'\u0100': /* LATIN CAPITAL LETTER A WITH MACRON */
case U'\u0102': /* LATIN CAPITAL LETTER A WITH BREVE */
case U'\u0104': /* LATIN CAPITAL LETTER A WITH OGONEK */
case U'\u0106': /* LATIN CAPITAL LETTER C WITH ACUTE */
case U'\u0108': /* LATIN CAPITAL LETTER C WITH CIRCUMFLEX */
case U'\u010A': /* LATIN CAPITAL LETTER C WITH DOT ABOVE */
case U'\u010C': /* LATIN CAPITAL LETTER C WITH CARON */
case U'\u010E': /* LATIN CAPITAL LETTER D WITH CARON */
case U'\u0110': /* LATIN CAPITAL LETTER D WITH STROKE */
case U'\u0112': /* LATIN CAPITAL LETTER E WITH MACRON */
case U'\u0114': /* LATIN CAPITAL LETTER E WITH BREVE */
case U'\u0116': /* LATIN CAPITAL LETTER E WITH DOT ABOVE */
case U'\u0118': /* LATIN CAPITAL LETTER E WITH OGONEK */
case U'\u011A': /* LATIN CAPITAL LETTER E WITH CARON */
case U'\u011C': /* LATIN CAPITAL LETTER G WITH CIRCUMFLEX */
case U'\u014A': /* LATIN CAPITAL LETTER ENG */
case U'\u0152': /* LATIN CAPITAL LIGATURE OE */
case U'\u0186': /* LATIN CAPITAL LETTER OPEN O */
case U'\u018E': /* LATIN CAPITAL LETTER REVERSED E */
case U'\u018F': /* LATIN CAPITAL LETTER SCHWA */
case U'\u0190': /* LATIN CAPITAL LETTER OPEN E */
case U'\u0194': /* LATIN CAPITAL LETTER GAMMA */
case U'\u0196': /* LATIN CAPITAL LETTER IOTA */
case U'\u01A9': /* LATIN CAPITAL LETTER ESH */
case U'\u01B1': /* LATIN CAPITAL LETTER UPSILON */
case U'\u01B2': /* LATIN CAPITAL LETTER V WITH HOOk */
case U'\u01B7': /* LATIN CAPITAL LETTER EZH */
case U'\u01F7': /* LATIN CAPITAL LETTER WYNN */
case U'\u021C': /* LATIN CAPITAL LETTER YOGH */
case U'\u0241': /* LATIN CAPITAL LETTER GLOTTAL STOP */
case U'\u0391': /* GREEK CAPITAL LETTER ALPHA */
case U'\u0392': /* GREEK CAPITAL LETTER BETA */
case U'\u0393': /* GREEK CAPITAL LETTER GAMMA */
case U'\u0394': /* GREEK CAPITAL LETTER DELTA */
case U'\u0395': /* GREEK CAPITAL LETTER EPSILON */
case U'\u0396': /* GREEK CAPITAL LETTER ZETA */
case U'\u0397': /* GREEK CAPITAL LETTER ETA */
case U'\u0398': /* GREEK CAPITAL LETTER THETA */
case U'\u0399': /* GREEK CAPITAL LETTER IOTA */
case U'\u039A': /* GREEK CAPITAL LETTER KAPPA */
case U'\u039B': /* GREEK CAPITAL LETTER LAMBDA */
case U'\u039C': /* GREEK CAPITAL LETTER MU */
case U'\u039D': /* GREEK CAPITAL LETTER NU */
case U'\u039E': /* GREEK CAPITAL LETTER XI */
case U'\u039F': /* GREEK CAPITAL LETTER OMICRON */
case U'\u03A0': /* GREEK CAPITAL LETTER PI */
case U'\u03A1': /* GREEK CAPITAL LETTER RHO */
case U'\u03A3': /* GREEK CAPITAL LETTER SIGMA */
case U'\u03A4': /* GREEK CAPITAL LETTER TAU */
case U'\u03A5': /* GREEK CAPITAL LETTER UPSILON */
case U'\u03A6': /* GREEK CAPITAL LETTER PHI */
case U'\u03A7': /* GREEK CAPITAL LETTER CHI */
case U'\u03A8': /* GREEK CAPITAL LETTER PSI */
case U'\u03A9': /* GREEK CAPITAL LETTER OMEGA */
case U'\u1E9E': /* LATIN CAPITAL LETTER SHARP S */
case U'\u2C6D': /* LATIN CAPITAL LETTER ALPHA */
case U'\uA77D': /* LATIN CAPITAL LETTER INSULAR G */
case U'\uA7B4': /* LATIN CAPITAL LETTER BETA */
case U'\uA7B6': /* LATIN CAPITAL LETTER OMEGA */
ret.res = true;
break;
}
return ret;
}
|
