627 static int constfolding (OpCode op, expdesc *e1, expdesc *e2) {  in constfolding()  argument
629   if (!isnumeral(e1) || !isnumeral(e2)) return 0;  in constfolding()
631   v2 = e2->u.nval;  in constfolding()
653 static void codearith (FuncState *fs, OpCode op, expdesc *e1, expdesc *e2) {  in codearith()  argument
654   if (constfolding(op, e1, e2))  in codearith()
657     int o2 = (op != OP_UNM && op != OP_LEN) ? luaK_exp2RK(fs, e2) : 0;  in codearith()
661       freeexp(fs, e2);  in codearith()
664       freeexp(fs, e2);  in codearith()
674                                                           expdesc *e2) {  in codecomp()  argument
676   int o2 = luaK_exp2RK(fs, e2);  in codecomp()
677   freeexp(fs, e2);  in codecomp()
690   expdesc e2;  in luaK_prefix()  local
691   e2.t = e2.f = NO_JUMP; e2.k = VKNUM; e2.u.nval = 0;  in luaK_prefix()
696       codearith(fs, OP_UNM, e, &e2);  in luaK_prefix()
702       codearith(fs, OP_LEN, e, &e2);  in luaK_prefix()
737 void luaK_posfix (FuncState *fs, BinOpr op, expdesc *e1, expdesc *e2) {  in luaK_posfix()  argument
741       luaK_dischargevars(fs, e2);  in luaK_posfix()
742       luaK_concat(fs, &e2->f, e1->f);  in luaK_posfix()
743       *e1 = *e2;  in luaK_posfix()
748       luaK_dischargevars(fs, e2);  in luaK_posfix()
749       luaK_concat(fs, &e2->t, e1->t);  in luaK_posfix()
750       *e1 = *e2;  in luaK_posfix()
754       luaK_exp2val(fs, e2);  in luaK_posfix()
755       if (e2->k == VRELOCABLE && GET_OPCODE(getcode(fs, e2)) == OP_CONCAT) {  in luaK_posfix()
756         lua_assert(e1->u.s.info == GETARG_B(getcode(fs, e2))-1);  in luaK_posfix()
758         SETARG_B(getcode(fs, e2), e1->u.s.info);  in luaK_posfix()
759         e1->k = VRELOCABLE; e1->u.s.info = e2->u.s.info;  in luaK_posfix()
762         luaK_exp2nextreg(fs, e2);  /* operand must be on the 'stack' */  in luaK_posfix()
763         codearith(fs, OP_CONCAT, e1, e2);  in luaK_posfix()
767     case OPR_ADD: codearith(fs, OP_ADD, e1, e2); break;  in luaK_posfix()
768     case OPR_SUB: codearith(fs, OP_SUB, e1, e2); break;  in luaK_posfix()
769     case OPR_MUL: codearith(fs, OP_MUL, e1, e2); break;  in luaK_posfix()
770     case OPR_DIV: codearith(fs, OP_DIV, e1, e2); break;  in luaK_posfix()
771     case OPR_MOD: codearith(fs, OP_MOD, e1, e2); break;  in luaK_posfix()
772     case OPR_POW: codearith(fs, OP_POW, e1, e2); break;  in luaK_posfix()
773     case OPR_EQ: codecomp(fs, OP_EQ, 1, e1, e2); break;  in luaK_posfix()
774     case OPR_NE: codecomp(fs, OP_EQ, 0, e1, e2); break;  in luaK_posfix()
775     case OPR_LT: codecomp(fs, OP_LT, 1, e1, e2); break;  in luaK_posfix()
776     case OPR_LE: codecomp(fs, OP_LE, 1, e1, e2); break;  in luaK_posfix()
777     case OPR_GT: codecomp(fs, OP_LT, 0, e1, e2); break;  in luaK_posfix()
778     case OPR_GE: codecomp(fs, OP_LE, 0, e1, e2); break;  in luaK_posfix()