** Convert a BinOpr to an OpCode (ORDER OPR - ORDER OP) */
| 1440 | ** Convert a BinOpr to an OpCode (ORDER OPR - ORDER OP) |
| 1441 | */ |
| 1442 | l_sinline OpCode binopr2op (BinOpr opr, BinOpr baser, OpCode base) { |
| 1443 | lua_assert(baser <= opr && |
| 1444 | ((baser == OPR_ADD && opr <= OPR_SHR) || |
| 1445 | (baser == OPR_LT && opr <= OPR_LE))); |
| 1446 | return cast(OpCode, (cast_int(opr) - cast_int(baser)) + cast_int(base)); |
| 1447 | } |
| 1448 | |
| 1449 | |
| 1450 | /* |
no outgoing calls
no test coverage detected