mirror of
https://github.com/PDP-10/its.git
synced 2026-03-29 19:08:01 +00:00
142 lines
2.1 KiB
C
142 lines
2.1 KiB
C
#define _U 01
|
|
#define _L 02
|
|
#define _N 04
|
|
#define _S 010
|
|
#define _P 020
|
|
#define _C 040
|
|
#define _X 0100
|
|
|
|
/* Character types for use by ctype.h */
|
|
|
|
char _ctype_[] = {
|
|
_C, /* NUL */
|
|
_C, /* SOH */
|
|
_C, /* STX */
|
|
_C, /* ETX */
|
|
_C, /* EOT */
|
|
_C, /* ENQ */
|
|
_C, /* ACK */
|
|
_C, /* BEL */
|
|
_C, /* BS */
|
|
_C|_S, /* HT */
|
|
_C|_S, /* LF */
|
|
_C|_S, /* VT */
|
|
_C|_S, /* FF */
|
|
_C|_S, /* CR */
|
|
_C, /* SO */
|
|
_C, /* SI */
|
|
_C, /* DLE */
|
|
_C, /* DC1 */
|
|
_C, /* DC2 */
|
|
_C, /* DC3 */
|
|
_C, /* DC4 */
|
|
_C, /* NAK */
|
|
_C, /* SYN */
|
|
_C, /* ETB */
|
|
_C, /* CAN */
|
|
_C, /* EM */
|
|
_C, /* SUB */
|
|
_C, /* ESC */
|
|
_C, /* FS */
|
|
_C, /* GS */
|
|
_C, /* RS */
|
|
_C, /* US */
|
|
_S, /* SP */
|
|
_P, /* ! */
|
|
_P, /* " */
|
|
_P, /* # */
|
|
_P, /* $ */
|
|
_P, /* % */
|
|
_P, /* & */
|
|
_P, /* ' */
|
|
_P, /* ( */
|
|
_P, /* ) */
|
|
_P, /* * */
|
|
_P, /* + */
|
|
_P, /* , */
|
|
_P, /* - */
|
|
_P, /* . */
|
|
_P, /* / */
|
|
_N, /* 0 */
|
|
_N, /* 1 */
|
|
_N, /* 2 */
|
|
_N, /* 3 */
|
|
_N, /* 4 */
|
|
_N, /* 5 */
|
|
_N, /* 6 */
|
|
_N, /* 7 */
|
|
_N, /* 8 */
|
|
_N, /* 9 */
|
|
_P, /* : */
|
|
_P, /* ; */
|
|
_P, /* < */
|
|
_P, /* = */
|
|
_P, /* > */
|
|
_P, /* ? */
|
|
_P, /* @ */
|
|
_U|_X, /* A */
|
|
_U|_X, /* B */
|
|
_U|_X, /* C */
|
|
_U|_X, /* D */
|
|
_U|_X, /* E */
|
|
_U|_X, /* F */
|
|
_U, /* G */
|
|
_U, /* H */
|
|
_U, /* I */
|
|
_U, /* J */
|
|
_U, /* K */
|
|
_U, /* L */
|
|
_U, /* M */
|
|
_U, /* N */
|
|
_U, /* O */
|
|
_U, /* P */
|
|
_U, /* Q */
|
|
_U, /* R */
|
|
_U, /* S */
|
|
_U, /* T */
|
|
_U, /* U */
|
|
_U, /* V */
|
|
_U, /* W */
|
|
_U, /* X */
|
|
_U, /* Y */
|
|
_U, /* Z */
|
|
_P, /* [ */
|
|
_P, /* \ */
|
|
_P, /* ] */
|
|
_P, /* ^ */
|
|
_P, /* _ */
|
|
_P, /* ` */
|
|
_L|_X, /* a */
|
|
_L|_X, /* b */
|
|
_L|_X, /* c */
|
|
_L|_X, /* d */
|
|
_L|_X, /* e */
|
|
_L|_X, /* f */
|
|
_L, /* g */
|
|
_L, /* h */
|
|
_L, /* i */
|
|
_L, /* j */
|
|
_L, /* k */
|
|
_L, /* l */
|
|
_L, /* m */
|
|
_L, /* n */
|
|
_L, /* o */
|
|
_L, /* p */
|
|
_L, /* q */
|
|
_L, /* r */
|
|
_L, /* s */
|
|
_L, /* t */
|
|
_L, /* u */
|
|
_L, /* v */
|
|
_L, /* w */
|
|
_L, /* x */
|
|
_L, /* y */
|
|
_L, /* z */
|
|
_P, /* { */
|
|
_P, /* | */
|
|
_P, /* } */
|
|
_P, /* ~ */
|
|
_P /* DEL */
|
|
};
|
|
|