source: buchla-68k/lib700/ctype.c@ fa38804

Last change on this file since fa38804 was fa38804, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Removed form-feed comments.
  • Property mode set to 100644
File size: 2.8 KB
Line 
1/*
2 ============================================================================
3 ctype.c -- extended character type table, ala' Unix(tm)
4 Version 8 -- 1987-06-16 -- D.N. Lynx Crowe
5
6 This character type table supports the extended ctype.h macros.
7 See the ctype.h header file for further notes.
8
9 WARNING: SYS5CODE must be defined properly in ctype.h for the macros
10 to work with this table.
11 ============================================================================
12*/
13
14#define _CTYPE_C
15
16#include "ram.h"
17
18#define _CS _C|_S
19#define _PS _P|_S
20#define _NX _N|_X
21#define _UX _U|_X
22#define _LX _L|_X
23
24int8_t __atab[] = { /* EOF won't work properly with this table */
25
26 /* Octal */ /* Hex */
27 /* 000..007 */ _C, _C, _C, _C, _C, _C, _C, _C, /* 00..07 */
28 /* 010..017 */ _C, _CS, _CS, _CS, _CS, _CS, _C, _C, /* 08..0F */
29 /* 020..027 */ _C, _C, _C, _C, _C, _C, _C, _C, /* 10..17 */
30 /* 030..037 */ _C, _C, _C, _C, _C, _C, _C, _C, /* 18..1F */
31 /* 040..047 */ _PS, _P, _P, _P, _P, _P, _P, _P, /* 20..27 */
32 /* 050..057 */ _P, _P, _P, _P, _P, _P, _P, _P, /* 28..2F */
33 /* 060..067 */ _NX, _NX, _NX, _NX, _NX, _NX, _NX, _NX, /* 30..37 */
34 /* 070..077 */ _NX, _NX, _P, _P, _P, _P, _P, _P, /* 38..3F */
35
36 /* 100..107 */ _P, _UX, _UX, _UX, _UX, _UX, _UX, _U, /* 40..47 */
37 /* 110..117 */ _U, _U, _U, _U, _U, _U, _U, _U, /* 48..4F */
38 /* 120..127 */ _U, _U, _U, _U, _U, _U, _U, _U, /* 50..57 */
39 /* 130..137 */ _U, _U, _U, _P, _P, _P, _P, _P, /* 58..5F */
40 /* 140..147 */ _P, _LX, _LX, _LX, _LX, _LX, _LX, _L, /* 60..67 */
41 /* 150..157 */ _L, _L, _L, _L, _L, _L, _L, _L, /* 68..6F */
42 /* 160..167 */ _L, _L, _L, _L, _L, _L, _L, _L, /* 70..77 */
43 /* 170..177 */ _L, _L, _L, _P, _P, _P, _P, _C, /* 78..7F */
44
45 /* 200..207 */ _C, _C, _C, _C, _C, _C, _C, _C, /* 80..87 */
46 /* 210..217 */ _C, _CS, _CS, _CS, _CS, _CS, _C, _C, /* 88..8F */
47 /* 220..227 */ _C, _C, _C, _C, _C, _C, _C, _C, /* 90..97 */
48 /* 230..237 */ _C, _C, _C, _C, _C, _C, _C, _C, /* 98..9F */
49 /* 240..247 */ _PS, _P, _P, _P, _P, _P, _P, _P, /* A0..A7 */
50 /* 250..257 */ _P, _P, _P, _P, _P, _P, _P, _P, /* A8..AF */
51 /* 260..267 */ _NX, _NX, _NX, _NX, _NX, _NX, _NX, _NX, /* B0..B7 */
52 /* 270..277 */ _NX, _NX, _P, _P, _P, _P, _P, _P, /* B8..BF */
53
54 /* 300..307 */ _P, _UX, _UX, _UX, _UX, _UX, _UX, _U, /* C0..C7 */
55 /* 310..317 */ _U, _U, _U, _U, _U, _U, _U, _U, /* C8..CF */
56 /* 320..327 */ _U, _U, _U, _U, _U, _U, _U, _U, /* D0..D7 */
57 /* 330..337 */ _U, _U, _U, _P, _P, _P, _P, _P, /* D8..DF */
58 /* 340..347 */ _P, _LX, _LX, _LX, _LX, _LX, _LX, _L, /* E0..E7 */
59 /* 350..357 */ _L, _L, _L, _L, _L, _L, _L, _L, /* E8..EF */
60 /* 360..367 */ _L, _L, _L, _L, _L, _L, _L, _L, /* F0..F7 */
61 /* 370..377 */ _L, _L, _L, _P, _P, _P, _P, _C /* F8..FF */
62};
63
64
Note: See TracBrowser for help on using the repository browser.