| 2 |
- |
1 |
#pragma src "/sys/src/libc/port"
|
|
|
2 |
#pragma lib "libc.a"
|
|
|
3 |
|
|
|
4 |
#define _U 01
|
|
|
5 |
#define _L 02
|
|
|
6 |
#define _N 04
|
|
|
7 |
#define _S 010
|
|
|
8 |
#define _P 020
|
|
|
9 |
#define _C 040
|
|
|
10 |
#define _B 0100
|
|
|
11 |
#define _X 0200
|
|
|
12 |
|
|
|
13 |
extern unsigned char _ctype[];
|
|
|
14 |
|
|
|
15 |
#define isalpha(c) (_ctype[(unsigned char)(c)]&(_U|_L))
|
|
|
16 |
#define isupper(c) (_ctype[(unsigned char)(c)]&_U)
|
|
|
17 |
#define islower(c) (_ctype[(unsigned char)(c)]&_L)
|
|
|
18 |
#define isdigit(c) (_ctype[(unsigned char)(c)]&_N)
|
|
|
19 |
#define isxdigit(c) (_ctype[(unsigned char)(c)]&_X)
|
|
|
20 |
#define isspace(c) (_ctype[(unsigned char)(c)]&_S)
|
|
|
21 |
#define ispunct(c) (_ctype[(unsigned char)(c)]&_P)
|
|
|
22 |
#define isalnum(c) (_ctype[(unsigned char)(c)]&(_U|_L|_N))
|
|
|
23 |
#define isprint(c) (_ctype[(unsigned char)(c)]&(_P|_U|_L|_N|_B))
|
|
|
24 |
#define isgraph(c) (_ctype[(unsigned char)(c)]&(_P|_U|_L|_N))
|
|
|
25 |
#define iscntrl(c) (_ctype[(unsigned char)(c)]&_C)
|
|
|
26 |
#define isascii(c) ((unsigned char)(c)<=0177)
|
|
|
27 |
#define _toupper(c) ((c)-'a'+'A')
|
|
|
28 |
#define _tolower(c) ((c)-'A'+'a')
|
|
|
29 |
#define toascii(c) ((c)&0177)
|