blob: a724a4caab6284756932aa56d727ca8733d57211 (
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
|
/*
* ctype.h Character classification and conversion
*/
#ifndef __CTYPE_H
#define __CTYPE_H
extern unsigned char __ctype[];
#define __CT_d 0x01 /* numeric digit */
#define __CT_u 0x02 /* upper case */
#define __CT_l 0x04 /* lower case */
#define __CT_c 0x08 /* control character */
#define __CT_s 0x10 /* whitespace */
#define __CT_p 0x20 /* punctuation */
#define __CT_x 0x40 /* hexadecimal */
#define toupper(c) (islower(c) ? (c)^0x20 : (c))
#define tolower(c) (isupper(c) ? (c)^0x20 : (c))
#define _toupper(c) ((c)^0x20)
#define _tolower(c) ((c)^0x20)
#define toascii(c) ((c)&0x7F)
#define __CT(c) (__ctype[1+(unsigned char)c])
/* Note the '!!' is a cast to 'bool' and even BCC deletes it in an if() */
#define isalnum(c) (!!(__CT(c)&(__CT_u|__CT_l|__CT_d)))
#define isalpha(c) (!!(__CT(c)&(__CT_u|__CT_l)))
#define isascii(c) (!((c)&~0x7F))
#define iscntrl(c) (!!(__CT(c)&__CT_c))
#define isdigit(c) (!!(__CT(c)&__CT_d))
#define isgraph(c) (!(__CT(c)&(__CT_c|__CT_s)))
#define islower(c) (!!(__CT(c)&__CT_l))
#define isprint(c) (!(__CT(c)&__CT_c))
#define ispunct(c) (!!(__CT(c)&__CT_p))
#define isspace(c) (!!(__CT(c)&__CT_s))
#define isupper(c) (!!(__CT(c)&__CT_u))
#define isxdigit(c) (!!(__CT(c)&__CT_x))
#endif /* __CTYPE_H */
|
