File:  [MW Coherent from dump] / coherent / b / bin / sh_B4_420 / tab.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Wed May 29 04:56:36 2019 UTC (7 years, 2 months ago) by root
Branches: MarkWilliams, MAIN
CVS tags: relic, HEAD
coherent

#include "sh.h"

/*
 * Table for determining type of character.
 */
char lextab[] ={
#if 1
	/* EOF */        MNQUO | MDQUO | MNAME,
	/* 0x00, ^@ */   0,
	/* 0x01, ^A */   0,
	/* 0x02, ^B */   0,
	/* 0x03, ^C */   0,
	/* 0x04, ^D */   0,
	/* 0x05, ^E */   0,
	/* 0x06, ^F */   0,
	/* 0x07, ^G */   0,
	/* 0x08, ^H */   0,
	/* 0x09, ^I */   MNQUO | MNAME,
	/* 0x0a, ^J */   MNQUO | MDQUO | MNAME,
	/* 0x0b, ^K */   0,
	/* 0x0c, ^L */   0,
	/* 0x0d, ^M */   0,
	/* 0x0e, ^N */   0,
	/* 0x0f, ^O */   0,
	/* 0x10, ^P */   0,
	/* 0x11, ^Q */   0,
	/* 0x12, ^R */   0,
	/* 0x13, ^S */   0,
	/* 0x14, ^T */   0,
	/* 0x15, ^U */   0,
	/* 0x16, ^V */   0,
	/* 0x17, ^W */   0,
	/* 0x18, ^X */   0,
	/* 0x19, ^Y */   0,
	/* 0x1a, ^Z */   0,
	/* 0x1b, ^[ */   0,
	/* 0x1c, ^\ */   0,
	/* 0x1d, ^] */   0,
	/* 0x1e, ^^ */   0,
	/* 0x1f, ^_ */   0,
	/* 0x20, ' ' */  MNQUO | MNAME,
	/* 0x21, '!' */  MSVAR,
	/* 0x22, '"' */  MNQUO | MDQUO,
	/* 0x23, '#' */  MSVAR,
	/* 0x24, '$' */  MNQUO | MDQUO | MHERE | MSVAR,
	/* 0x25, '%' */  0,
	/* 0x26, '&' */  MNQUO | MNAME,
	/* 0x27, ''' */  MNQUO,
	/* 0x28, '(' */  MNQUO | MNAME,
	/* 0x29, ')' */  MNQUO | MNAME,
	/* 0x2a, '*' */  MSVAR | MGLOB,
	/* 0x2b, '+' */  0,
	/* 0x2c, ',' */  0,
	/* 0x2d, '-' */  MSVAR,
	/* 0x2e, '.' */  0,
	/* 0x2f, '/' */  0,
	/* 0x30, '0' */  MSVAR | MDIGI,
	/* 0x31, '1' */  MSVAR | MDIGI,
	/* 0x32, '2' */  MSVAR | MDIGI,
	/* 0x33, '3' */  MSVAR | MDIGI,
	/* 0x34, '4' */  MSVAR | MDIGI,
	/* 0x35, '5' */  MSVAR | MDIGI,
	/* 0x36, '6' */  MSVAR | MDIGI,
	/* 0x37, '7' */  MSVAR | MDIGI,
	/* 0x38, '8' */  MSVAR | MDIGI,
	/* 0x39, '9' */  MSVAR | MDIGI,
	/* 0x3a, ':' */  0,
	/* 0x3b, ';' */  MNQUO | MNAME,
	/* 0x3c, '<' */  MNQUO | MNAME,
	/* 0x3d, '=' */  0,
	/* 0x3e, '>' */  MNQUO | MNAME,
	/* 0x3f, '?' */  MSVAR | MGLOB,
	/* 0x40, '@' */  MSVAR,
	/* 0x41, 'A' */  MBVAR,
	/* 0x42, 'B' */  MBVAR,
	/* 0x43, 'C' */  MBVAR,
	/* 0x44, 'D' */  MBVAR,
	/* 0x45, 'E' */  MBVAR,
	/* 0x46, 'F' */  MBVAR,
	/* 0x47, 'G' */  MBVAR,
	/* 0x48, 'H' */  MBVAR,
	/* 0x49, 'I' */  MBVAR,
	/* 0x4a, 'J' */  MBVAR,
	/* 0x4b, 'K' */  MBVAR,
	/* 0x4c, 'L' */  MBVAR,
	/* 0x4d, 'M' */  MBVAR,
	/* 0x4e, 'N' */  MBVAR,
	/* 0x4f, 'O' */  MBVAR,
	/* 0x50, 'P' */  MBVAR,
	/* 0x51, 'Q' */  MBVAR,
	/* 0x52, 'R' */  MBVAR,
	/* 0x53, 'S' */  MBVAR,
	/* 0x54, 'T' */  MBVAR,
	/* 0x55, 'U' */  MBVAR,
	/* 0x56, 'V' */  MBVAR,
	/* 0x57, 'W' */  MBVAR,
	/* 0x58, 'X' */  MBVAR,
	/* 0x59, 'Y' */  MBVAR,
	/* 0x5a, 'Z' */  MBVAR,
	/* 0x5b, '[' */  MGLOB,
	/* 0x5c, '\' */  MNQUO | MDQUO | MHERE,
	/* 0x5d, ']' */  MGLOB,
	/* 0x5e, '^' */  0,
	/* 0x5f, '_' */  MBVAR,
	/* 0x60, '`' */  MNQUO | MDQUO | MHERE,
	/* 0x61, 'a' */  MBVAR,
	/* 0x62, 'b' */  MBVAR,
	/* 0x63, 'c' */  MBVAR,
	/* 0x64, 'd' */  MBVAR,
	/* 0x65, 'e' */  MBVAR,
	/* 0x66, 'f' */  MBVAR,
	/* 0x67, 'g' */  MBVAR,
	/* 0x68, 'h' */  MBVAR,
	/* 0x69, 'i' */  MBVAR,
	/* 0x6a, 'j' */  MBVAR,
	/* 0x6b, 'k' */  MBVAR,
	/* 0x6c, 'l' */  MBVAR,
	/* 0x6d, 'm' */  MBVAR,
	/* 0x6e, 'n' */  MBVAR,
	/* 0x6f, 'o' */  MBVAR,
	/* 0x70, 'p' */  MBVAR,
	/* 0x71, 'q' */  MBVAR,
	/* 0x72, 'r' */  MBVAR,
	/* 0x73, 's' */  MBVAR,
	/* 0x74, 't' */  MBVAR,
	/* 0x75, 'u' */  MBVAR,
	/* 0x76, 'v' */  MBVAR,
	/* 0x77, 'w' */  MBVAR,
	/* 0x78, 'x' */  MBVAR,
	/* 0x79, 'y' */  MBVAR,
	/* 0x7a, 'z' */  MBVAR,
	/* 0x7b, '{' */  0,
	/* 0x7c, '|' */  MNQUO | MNAME,
	/* 0x7d, '}' */  0,
	/* 0x7e, '~' */  0,
	/* 0x7f */       0
#else
	                                          0103,	/* EOF */
	0000, 0000, 0000, 0000, 0000, 0000, 0000, 0000,	/* 0x00 to 0x07 */
	0000, 0101, 0103, 0000, 0000, 0000, 0000, 0000,	/* 0x08 to 0x0F */
	0000, 0000, 0000, 0000, 0000, 0000, 0000, 0000,	/* 0x10 to 0x17 */
	0000, 0000, 0000, 0000, 0000, 0000, 0000, 0000,	/* 0x18 to 0x1F */
	0101, 0010, 0003, 0010, 0017, 0000, 0101, 0001,	/* 0x20 to 0x27 */
	0101, 0101, 0210, 0000, 0000, 0010, 0000, 0000,	/* 0x28 to 0x2F */
	0030, 0030, 0030, 0030, 0030, 0030, 0030, 0030,	/* 0x30 to 0x37 */
	0030, 0030, 0000, 0101, 0101, 0000, 0101, 0210,	/* 0x38 to 0x3F */
	0010, 0040, 0040, 0040, 0040, 0040, 0040, 0040,	/* 0x40 to 0x47 */
	0040, 0040, 0040, 0040, 0040, 0040, 0040, 0040,	/* 0x48 to 0x4F */
	0040, 0040, 0040, 0040, 0040, 0040, 0040, 0040,	/* 0x50 to 0x57 */
	0040, 0040, 0040, 0200, 0007, 0200, 0000, 0040,	/* 0x58 to 0x5F */
	0007, 0040, 0040, 0040, 0040, 0040, 0040, 0040,	/* 0x60 to 0x67 */
	0040, 0040, 0040, 0040, 0040, 0040, 0040, 0040,	/* 0x68 to 0x6F */
	0040, 0040, 0040, 0040, 0040, 0040, 0040, 0040,	/* 0x70 to 0x77 */
	0040, 0040, 0040, 0000, 0101, 0000, 0000, 0000	/* 0x78 to 0x7F */
#endif
};

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.