@i @Statement.node@ = new_node(O_ASSIGN, @Expr.node@, @Lexpr.node@);
@i @Statement.vars@ = 0;
@reg @Statement.node@->reg = @Expr.node@->reg = next_reg((char *)NULL, @Expr.gparamges@);
+ @reg @Lexpr.node@->reg = next_reg(@Expr.node@->reg, @Expr.gparamges@);
@gen write_tree(@Statement.node@, 0); burm_label(@Statement.node@); burm_reduce(@Statement.node@, 1);
@}
@c check(@Feld.s@, @IDENT.name@, S_FIELD);
@i @Feld.node@ = new_field(@IDENT.name@, @Term.node@, TREENULL, tab_lookup(@Feld.s@, @IDENT.name@, S_FIELD) == SYMNULL ? -1 : tab_lookup(@Feld.s@, @IDENT.name@, S_FIELD)->soffset);
- @reg @Term.node@->reg = @Feld.node@->reg;
+ @reg @Term.node@->reg = next_reg(@Feld.node@->reg, @Term.gparamges@);
@}
;