ack/lang/pc/comp/char.c

395 lines
2.2 KiB
C
Raw Normal View History

1988-10-26 15:21:11 +00:00
#include "class.h"
char tkclass[] = {
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STSKIP,
STNL,
STNL,
STNL,
STSKIP,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STSKIP,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STGARB,
STSTR,
STSIMP,
STSIMP,
STSIMP,
STSIMP,
STSIMP,
STSIMP,
STCOMP,
STSIMP,
STNUM,
STNUM,
STNUM,
STNUM,
STNUM,
STNUM,
STNUM,
STNUM,
STNUM,
STNUM,
STCOMP,
STSIMP,
STCOMP,
STSIMP,
STCOMP,
STGARB,
STSIMP,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STSIMP,
STGARB,
STSIMP,
STSIMP,
STGARB,
STGARB,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STIDF,
STSIMP,
STGARB,
STSIMP,
STGARB,
STGARB,
STEOI,
};
char inidf[] = {
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
0,
0,
0,
0,
0,
0,
0,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
0,
0,
0,
0,
0,
0,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
0,
0,
0,
0,
0,
0,
};
char isdig[] = {
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
1,
1,
1,
1,
1,
1,
1,
1,
1,
1,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
};