Added a DO_TOSTACK command, and put set number of ALL in tables.c

This commit is contained in:
ceriel 1987-08-20 19:04:18 +00:00
parent 754f9ce45d
commit 18b7250736
2 changed files with 2 additions and 3 deletions

View file

@ -757,8 +757,6 @@ kills
{ $$ = 0; } { $$ = 0; }
| KILLS kill_list | KILLS kill_list
{ $$ = $2; { $$ = $2;
if (optstack)
error("No sense in giving kills in this pattern");
} }
; ;
kill_list kill_list

View file

@ -96,6 +96,7 @@ finishcode() {
if (code_in_c) if (code_in_c)
fprintf(ctable,"\n};\n\n"); fprintf(ctable,"\n};\n\n");
fprintf(ctable, "int allsetno = %d;\n", allsetno);
if (tabledebug) { if (tabledebug) {
int fd; int fd;
int sz; int sz;
@ -683,7 +684,7 @@ varinfo *kills,*allocates,*generates,*yields,*leaving;
} else if (stackcoerc) } else if (stackcoerc)
code8nl(DO_COERC); code8nl(DO_COERC);
if (optstack) { if (optstack) {
code53(DO_REMOVE,0); code53(DO_TOSTACK,0);
codeint(allsetno); codeint(allsetno);
codenl(); codenl();
} }