| 1 | #define _U 01 |
| 2 | #define _L 02 |
| 3 | #define _N 04 |
| 4 | #define _S 010 |
| 5 | #define _P 020 |
| 6 | #define _C 040 |
| 7 | #define _X 0100 |
| 8 | |
| 9 | extern char _ctype_[]; |
| 10 | |
| 11 | #define isalpha(c) ((_ctype_+1)[c]&(_U|_L)) |
| 12 | #define isupper(c) ((_ctype_+1)[c]&_U) |
| 13 | #define islower(c) ((_ctype_+1)[c]&_L) |
| 14 | #define isdigit(c) ((_ctype_+1)[c]&_N) |
| 15 | #define isxdigit(c) ((_ctype_+1)[c]&(_N|_X)) |
| 16 | #define isspace(c) ((_ctype_+1)[c]&_S) |
| 17 | #define ispunct(c) ((_ctype_+1)[c]&_P) |
| 18 | #define isalnum(c) ((_ctype_+1)[c]&(_U|_L|_N)) |
| 19 | #define isprint(c) ((_ctype_+1)[c]&(_P|_U|_L|_N)) |
| 20 | #define iscntrl(c) ((_ctype_+1)[c]&_C) |
| 21 | #define isascii(c) ((unsigned)(c)<=0177) |
| 22 | #define toupper(c) ((c)-'a'+'A') |
| 23 | #define tolower(c) ((c)-'A'+'a') |
| 24 | #define toascii(c) ((c)&0177) |