blob: 6930a8f14cd7ac7a6806dbc157878749568fa7d3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
/* ISO 8859/1 Latin-1 "ctype" macro replacements. */
extern unsigned char isoalpha[32], isoupper[32], isolower[32];
#define isISOspace(x) ((isascii(((unsigned char) (x))) && isspace(((unsigned char) (x)))) || ((x) == 0xA0))
#define isISOalpha(x) ((isoalpha[(((unsigned char) (x))) / 8] & (0x80 >> ((((unsigned char) (x))) % 8))) != 0)
#define isISOupper(x) ((isoupper[(((unsigned char) (x))) / 8] & (0x80 >> ((((unsigned char) (x))) % 8))) != 0)
#define isISOlower(x) ((isolower[(((unsigned char) (x))) / 8] & (0x80 >> ((((unsigned char) (x))) % 8))) != 0)
#define isISOprint(x) ((((x) >= ' ') && ((x) <= '~')) || ((x) >= 0xA0))
#define toISOupper(x) (isISOlower(x) ? (isascii(((unsigned char) (x))) ? \
toupper(x) : (((((unsigned char) (x)) != 0xDF) && \
(((unsigned char) (x)) != 0xFF)) ? \
(((unsigned char) (x)) - 0x20) : (x))) : (x))
#define toISOlower(x) (isISOupper(x) ? (isascii(((unsigned char) (x))) ? \
tolower(x) : (((unsigned char) (x)) + 0x20)) \
: (x))
|
