stat2
pa_pat { $$ = stat2(PASTAT, $1, stat2(PRINT, rectonode(), NIL)); }
| pa_pat lbrace stmtlist '}' { $$ = stat2(PASTAT, $1, $3); }
| pa_pat ',' opt_nl pa_pat { $$ = pa2stat($1, $4, stat2(PRINT, rectonode(), NIL)); }
| lbrace stmtlist '}' { $$ = stat2(PASTAT, NIL, $2); }
| DELETE varname '[' patlist ']' { $$ = stat2(DELETE, makearr($2), $4); }
| DELETE varname { $$ = stat2(DELETE, makearr($2), 0); }
{ $$ = stat2(DO, $3, notnull($7)); }
| while {inloop++;} stmt { --inloop; $$ = stat2(WHILE, $1, $3); }
extern Node *stat2(int, Node *, Node *);