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