godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added nflag, that allows the LLmessage(-1) call, to indicate garbage

Browse Source 
at end of program.
This commit is contained in:
ceriel 1986-10-29 11:27:47 +00:00
parent d02d0632c0
commit 07626ee7b3
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
util/LLgen/src/gencode.c
View File

@ -178,7 +178,7 @@ genrecovery() {
for (st = start; st; st = st->ff_next) { for (st = start; st; st = st->ff_next) {
fputs(st->ff_name, f); fputs(st->ff_name, f);
p = &nonterms[st->ff_nont]; p = &nonterms[st->ff_nont];
fputs("() {\n\tunsigned int s[LL_NTERMINALS+LL_NSETS+1];\n\tLLnewlevel(s);\n\tLLread();\n", f); fputs("() {\n\tunsigned int s[LL_NTERMINALS+LL_NSETS+2];\n\tLLnewlevel(s);\n\tLLread();\n", f);
if (g_gettype(p->n_rule) == ALTERNATION) { if (g_gettype(p->n_rule) == ALTERNATION) {
genpush(findindex(p->n_contains)); genpush(findindex(p->n_contains));
} }
@ -206,6 +206,7 @@ genrecovery() {
} }
fputs(c_arrend, f); fputs(c_arrend, f);
free((p_mem) index); free((p_mem) index);
if (nflag) fputs("#define LL_NEWMESS\n", f);
copyfile(rec_file); copyfile(rec_file);
if (ferror(f) != 0) { if (ferror(f) != 0) {
fatal(0,"write error on temporary"); fatal(0,"write error on temporary");