Added LL_MAXTOKNO
This commit is contained in:
parent
dfeffe5e95
commit
ca4461dc4c
1 changed files with 5 additions and 1 deletions
|
@ -154,15 +154,19 @@ opentemp(str) string str; {
|
||||||
STATIC
|
STATIC
|
||||||
geninclude() {
|
geninclude() {
|
||||||
register p_token p;
|
register p_token p;
|
||||||
|
int maxno = 0;
|
||||||
|
|
||||||
opentemp((string) 0);
|
opentemp((string) 0);
|
||||||
for (p = tokens; p < maxt; p++) {
|
for (p = tokens; p < maxt; p++) {
|
||||||
|
if (p->t_tokno > maxno) maxno = p->t_tokno;
|
||||||
if (p->t_tokno >= 0400) {
|
if (p->t_tokno >= 0400) {
|
||||||
fprintf(fpars,"# define %s %d\n",
|
fprintf(fpars,"#define %s %d\n",
|
||||||
p->t_string,
|
p->t_string,
|
||||||
p->t_tokno);
|
p->t_tokno);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
fprintf(fpars, "#define %s_MAXTOKNO %d\n", prefix ? prefix : "LL",
|
||||||
|
maxno);
|
||||||
doclose(fpars);
|
doclose(fpars);
|
||||||
install(f_include, ".");
|
install(f_include, ".");
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue