![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to ldefs.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv9 / cmd / lex|
Return to ldefs.c CVS log | Up to [Research Unix] / researchv9 / cmd / lex |
1.1 root 1: # include <stdio.h>
2: # define PP 1
3: # ifdef u370
4: # define CWIDTH 8
5: # define CMASK 0377
6: # define ASCII 1
7: # else
8:
9: # ifdef unix
10:
11: # define CWIDTH 7
12: # define CMASK 0177
13: # define ASCII 1
14: # endif
15:
16: # ifdef gcos
17: # define CWIDTH 9
18: # define CMASK 0777
19: # define ASCII 1
20: # endif
21:
22: # ifdef ibm
23: # define CWIDTH 8
24: # define CMASK 0377
25: # define EBCDIC 1
26: # endif
27:
28: # ifdef ASCII
29: # define NCH 128
30: # endif
31:
32: # ifdef EBCDIC
33: # define NCH 256
34: # endif
35:
36:
37: # define TOKENSIZE 1000
38: # define DEFSIZE 40
39: # define DEFCHAR 1000
40: # define STARTCHAR 100
41: # define STARTSIZE 256
42: # define CCLSIZE 1000
43: # ifdef SMALL
44: # define TREESIZE 600
45: # define NTRANS 1500
46: # define NSTATES 300
47: # define MAXPOS 1500
48: # define NOUTPUT 1500
49: # endif
50:
51: # ifndef SMALL
52: # define TREESIZE 1000
53: # define NSTATES 500
54: # define MAXPOS 2500
55: # define NTRANS 2000
56: # define NOUTPUT 3000
57: # endif
58: # define NACTIONS 100
59: # define ALITTLEEXTRA 30
60:
61: # define RCCL NCH+90
62: # define RNCCL NCH+91
63: # define RSTR NCH+92
64: # define RSCON NCH+93
65: # define RNEWE NCH+94
66: # define FINAL NCH+95
67: # define RNULLS NCH+96
68: # define RCAT NCH+97
69: # define STAR NCH+98
70: # define PLUS NCH+99
71: # define QUEST NCH+100
72: # define DIV NCH+101
73: # define BAR NCH+102
74: # define CARAT NCH+103
75: # define S1FINAL NCH+104
76: # define S2FINAL NCH+105
77:
78: # define DEFSECTION 1
79: # define RULESECTION 2
80: # define ENDSECTION 5
81: # define TRUE 1
82: # define FALSE 0
83:
84: # define PC 1
85: # define PS 1
86:
87: # ifdef DEBUG
88: # define LINESIZE 110
89: extern int yydebug;
90: extern int debug; /* 1 = on */
91: extern int charc;
92: # endif
93:
94: # ifndef DEBUG
95: # define freturn(s) s
96: # endif
97:
98: extern int sargc;
99: extern char **sargv;
100: extern char buf[520];
101: extern int ratfor; /* 1 = ratfor, 0 = C */
102: extern int yyline; /* line number of file */
103: extern int sect;
104: extern int eof;
105: extern int lgatflg;
106: extern int divflg;
107: extern int funcflag;
108: extern int pflag;
109: extern int casecount;
110: extern int chset; /* 1 = char set modified */
111: extern FILE *fin, *fout, *fother, *errorf;
112: extern int fptr;
113: extern char *ratname, *cname;
114: extern int prev; /* previous input character */
115: extern int pres; /* present input character */
116: extern int peek; /* next input character */
117: extern int *name;
118: extern int *left;
119: extern int *right;
120: extern int *parent;
121: extern char *nullstr;
122: extern int tptr;
123: extern char pushc[TOKENSIZE];
124: extern char *pushptr;
125: extern char slist[STARTSIZE];
126: extern char *slptr;
127: extern char **def, **subs, *dchar;
128: extern char **sname, *schar;
129: extern char *ccl;
130: extern char *ccptr;
131: extern char *dp, *sp;
132: extern int dptr, sptr;
133: extern char *bptr; /* store input position */
134: extern char *tmpstat;
135: extern int count;
136: extern int **foll;
137: extern int *nxtpos;
138: extern int *positions;
139: extern int *gotof;
140: extern int *nexts;
141: extern char *nchar;
142: extern int **state;
143: extern int *sfall; /* fallback state num */
144: extern char *cpackflg; /* true if state has been character packed */
145: extern int *atable, aptr;
146: extern int nptr;
147: extern char symbol[NCH];
148: extern char cindex[NCH];
149: extern int xstate;
150: extern int stnum;
151: extern int ctable[];
152: extern int ZCH;
153: extern int ccount;
154: extern char match[NCH];
155: extern char extra[NACTIONS];
156: extern char *pcptr, *pchar;
157: extern int pchlen;
158: extern int nstates, maxpos;
159: extern int yytop;
160: extern int report;
161: extern int ntrans, treesize, outsize;
162: extern long rcount;
163: extern int optim;
164: extern int *verify, *advance, *stoff;
165: extern int scon;
166: extern char *psave;
167: extern char *calloc(), *myalloc();
168: extern int buserr(), segviol();
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.