d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

some tables are static now

Browse source
This commit is contained in:
ceriel 1988-06-24 09:32:15 +00:00
parent a27fac26db
commit d20bfe4f68
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
util/LLgen/src/gencode.c
View file

@ -200,7 +200,7 @@ genrecovery() {
fputs("\tLLoldlevel(s);\n}\n",f);
}
/* Now generate the sets */
fputs("char LLsets[] = {\n",f);
fputs("static char LLsets[] = {\n",f);
for (psetl = setptr; psetl < maxptr; psetl++) prset(*psetl);
fputs(c_arrend, f);
index = (int *) alloc((unsigned) (assval * sizeof(int)));
@ -208,14 +208,14 @@ genrecovery() {
for (t = tokens; t < maxt; t++) {
index[t->t_tokno] = t - tokens;
}
fputs("short LLindex[] = {\n",f);
fputs("static short LLindex[] = {\n",f);
for (q = index; q < &index[assval]; q++) {
fprintf(f, "%d,\n", *q);
}
fputs(c_arrend, f);
free((p_mem) index);
if (onerror) {
fputs("short LLtok[] = {\n", f);
fputs("static short LLtok[] = {\n", f);
for (t = tokens; t < maxt; t++) {
fprintf(f, t->t_tokno<0400 ? "'%s',\n" : "%s,\n",t->t_string);
}