about bcemit_comp
- From: "wangqw1215"<wangqw1215@xxxxxxxx>
- To: "luajit"<luajit@xxxxxxxxxxxxx>
- Date: Fri, 11 Jan 2013 14:54:37 +0800
hi all:
lj_parse.c
static void bcemit_comp(FuncState *fs, BinOpr opr, ExpDesc *e1, ExpDesc *e2)
{
ExpDesc *eret = e1;
BCIns ins;
expr_toval(fs, e1);
if (opr == OPR_EQ || opr == OPR_NE) {
BCOp op = opr == OPR_EQ ? BC_ISEQV : BC_ISNEV;
BCReg ra;
if (expr_isk(e1)) { e1 = e2; e2 = eret; } /* Need constant in 2nd arg. */
ra = expr_toanyreg(fs, e1); /* First arg must be in a reg. */
expr_toval(fs, e2);
switch (e2->k) {
case VKNIL: case VKFALSE: case VKTRUE:
ins = BCINS_AD(op+(BC_ISEQP-BC_ISEQV), ra, const_pri(e2));
break;
case VKSTR:
ins = BCINS_AD(op+(BC_ISEQS-BC_ISEQV), ra, const_str(fs, e2));
break;
case VKNUM:
ins = BCINS_AD(op+(BC_ISEQN-BC_ISEQV), ra, const_num(fs, e2));
break;
default:
ins = BCINS_AD(op, ra, expr_toanyreg(fs, e2));
break;
}
} else {
uint32_t op = opr-OPR_LT+BC_ISLT;
BCReg ra, rd;
if ((op-BC_ISLT) & 1) { // GT -> LT, GE -> LE
e1 = e2; e2 = eret; // Swap operands.
op = ((op-BC_ISLT)^3)+BC_ISLT;
expr_toval(fs, e1);// need the code after swapping?
}
rd = expr_toanyreg(fs, e2);
ra = expr_toanyreg(fs, e1);
ins = BCINS_AD(op, ra, rd);
}
thanks
2013-01-11
wangqw1215
Other related posts:
