|
DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2162 (0x872)
Types: TextFile
Names: »C_CHCLASSTAB.S«
└─⟦e0c43619c⟧ Bits:30005797 CR80 Disc pack ( Vol:FNJ1 861029/EC CR80 S/W Package II+III+IV+V+VII )
└─ ⟦this⟧ »CSP004_V0801.D!CSS210.D!C_CHCLASSTAB.S«
/*----------------------------------------------------------------------
"
"
" MODULE NAME: C CHARACTER CLASS TABLE
" MODULE ID NMB: CSS/210
" MODULE VERSION: 1
" MODULE TYPE:
" MERGE FILES: -
"
" SPECIFICATIONS: -
" AUTHOR/DATE: NA/850704
"
" DELIVERABLE: YES
" SOURCE LANGUAGE: C
" COMPILE COMPUTER: CR80
" TARGET COMPUTER: CR80
" OPER. SYSTEM: -
"
"-----------------------------------------------------------------------
"
" CHANGE RECORD
"
" VERSION AUTHOR/DATE DESCRIPTION OF CHANGE
" ------- ----------- ---------------------
"
" 0402 NA/850704 INITIAL RELEASE
"
"---------------------------------------------------------------------*/
/* CHARACTER CLASSES */
#define SKIP 1
#define ALFA 2
#define NUMERIC 3
#define DELIM 4
#define COMMENT 5
#define STRINGCH 6
#define HEXCHAR 7
#define IGNORE 8
#define ESCAPE 9
/* DEFINING THE CHARACTER CLASS OF EACH ASCII CHARACTER (0..127) */
short chcltab [ 128 ] = { /* ASCII table */
1, 8, 8, 8, 8, 8, 8, 8, /* nul, ... */
8, 8, 8, 8, 8, 8, 8, 8, /* ... */
8, 8, 8, 8, 8, 8, 8, 8, /* ... */
8, 8, 8, 8, 8, 8, 8, 8, /* ... , us */
8, 4, 5, 7, 4, 9, 4, 6, /* ' ' '!' '"' '#' '$' '%' '&' ''' */
4, 4, 4, 4, 4, 4, 4, 4, /* '(' ')' '*' '+' ',' '-' '.' '/' */
3, 3, 3, 3, 3, 3, 3, 3, /* 0 , 1 , 2 , ... */
3, 3, 4, 4, 4, 4, 4, 4, /* 8 , 9 ':' ... */
4, 2, 2, 2, 2, 2, 2, 2, /* '@' A , B , ... */
2, 2, 2, 2, 2, 2, 2, 2, /* ... */
2, 2, 2, 2, 2, 2, 2, 2, /* ... */
2, 2, 2, 4, 4, 4, 4, 2, /* X , Y , Z ,'[' '\' ... '_'*/
4, 2, 2, 2, 2, 2, 2, 2, /* , a , b , ... */
2, 2, 2, 2, 2, 2, 2, 2, /* ... */
2, 2, 2, 2, 2, 2, 2, 2, /* ... */
2, 2, 2, 4, 4, 4, 4, 4 /* x , y , z ,'{' '|' ... ,del*/
} ;