Research V6 development

[unix-history] / usr / source / m6 / m67.c

#define PSIZE 1000
#define GSIZE 2000
#define DSIZE 5000

int pmax PSIZE;
char p0[PSIZE];

int gmax GSIZE;
char g0[GSIZE];

int dmax DSIZE;
char d0[DSIZE] {
       0,0,
       8,0,  0,0,  6,0,  0,0,  /*null*/
       12,0, 35,0, 11,0, 't','r','a','c','e',0,
       12,0, 23,0, 10,0, 'w','a','r','n',0,0,
       12,0, 22,0, 10,0, 'c','o','p','y',0,0,
       12,0, 32,0, 11,0, 'q','u','o','t','e',0,
       14,0, 33,0, 12,0, 's','e','r','i','a','l',0,0,
       12,0, 34,0, 10,0, 'l','i','s','t',0,0,
       12,0, 24,0, 10,0, 's','i','z','e',0,0,
       14,0, 25,0, 12,0, 's','u','b','s','t','r',0,0,
       10,0, 26,0, 8,0,  'g','o',0,0,
       12,0, 27,0, 10,0, 'g','o','b','k',0,0,
       10,0, 28,0, 9,0,  'd','e','l',0,
       10,0, 29,0, 9,0,  'd','n','l',0,
       10,0, 7,0,  9,0,  's','e','q',0,
       10,0, 8,0,  9,0,  's','n','e',0,
       10,0, 9,0,  9,0,  'a','d','d',0,
       10,0, 10,0, 9,0,  's','u','b',0,
       10,0, 11,0, 9,0,  'm','p','y',0,
       10,0, 12,0, 9,0,  'd','i','v',0,
       10,0, 13,0, 9,0,  'e','x','p',0,
       10,0, 1,0,  8,0,  'g','t',0,0,
       10,0, 2,0,  8,0,  'e','q',0,0,
       10,0, 3,0,  8,0,  'g','e',0,0,
       10,0, 4,0,  8,0,  'l','t',0,0,
       10,0, 5,0,  8,0,  'n','e',0,0,
       10,0, 6,0,  8,0,  'l', 'e',0,0,
       10,0, 21,0, 9,0,  'd','e','f',0,
       10,0, 20,0, 8,0,  'i','f',0,
       0,0
};

int dummy[] {
       0,
       0,
       6,
       '$0',
       0
};
char metas[] {
       '<',
       '>',
       '#',
       ':',
       ';',
       ',',
       '$'
};

int rescan 1;
int traceflag 0;
int trashflag 0;
char one[] { 
       '1',0 };