codeb: Lexpr braucht auch ein register

diff --git a/codeb/parser.y b/codeb/parser.y
index 92055506019ab8f10d0bed6c6cca8840e3e27da7..a6a9a21a32cfa1b0fb8ecf2c1d73cad658086370 100644 (file)
--- a/codeb/parser.y
+++ b/codeb/parser.y
@@ -156,6 +156,7 @@ Statement:
            @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);
          @}