Fix FOLD of string concatenations.

diff --git a/src/lj_opt_fold.c b/src/lj_opt_fold.c
index 7194e61810b41db1f46e00dfa33a57f1e4fd6e90..ab963ed4b25a6fc14d8ef3a54b6b5a4cb165adf8 100644 (file)
--- a/src/lj_opt_fold.c
+++ b/src/lj_opt_fold.c
@@ -585,7 +585,8 @@ LJFOLDF(bufstr_kfold_cse)
     if (fleft->o == IR_BUFHDR) {  /* No put operations? */
       if (!(fleft->op2 & IRBUFHDR_APPEND))  /* Empty buffer? */
        return lj_ir_kstr(J, &J2G(J)->strempty);
-      fins->op1 = fleft->prev;  /* Relies on checks in bufput_append. */
+      fins->op1 = fleft->op1;
+      fins->op2 = fleft->prev;  /* Relies on checks in bufput_append. */
       return CSEFOLD;
     } else if (fleft->o == IR_BUFPUT) {
       IRIns *irb = IR(fleft->op1);