blob: da48fbb77787b24489b68acd10655bbf70d77887 (
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
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
|
#include <wctype.h>
#include <newlib.h>
#include "check.h"
int main()
{
wctype_t x;
x = wctype ("alpha");
CHECK (x != 0);
CHECK (iswctype (L'a', x) && isalpha ('a'));
x = wctype ("alnum");
CHECK (x != 0);
CHECK (iswctype (L'0', x) && isalnum ('0'));
x = wctype ("blank");
CHECK (x != 0);
CHECK (iswctype (L' ', x) && isblank (' '));
x = wctype ("cntrl");
CHECK (x != 0);
CHECK (iswctype (L'\n', x) && iscntrl ('\n'));
x = wctype ("digit");
CHECK (x != 0);
CHECK (iswctype (L'7', x) && isdigit ('7'));
x = wctype ("graph");
CHECK (x != 0);
CHECK (iswctype (L'!', x) && isgraph ('!'));
x = wctype ("lower");
CHECK (x != 0);
CHECK (iswctype (L'k', x) && islower ('k'));
x = wctype ("print");
CHECK (x != 0);
CHECK (iswctype (L'@', x) && isprint ('@'));
x = wctype ("punct");
CHECK (x != 0);
CHECK (iswctype (L'.', x) && ispunct ('.'));
x = wctype ("space");
CHECK (x != 0);
CHECK (iswctype (L'\t', x) && isspace ('\t'));
x = wctype ("upper");
CHECK (x != 0);
CHECK (iswctype (L'T', x) && isupper ('T'));
x = wctype ("xdigit");
CHECK (x != 0);
CHECK (iswctype (L'B', x) && isxdigit ('B'));
x = wctype ("unknown");
CHECK (x == 0);
exit (0);
}
|