diff options
Diffstat (limited to 'src/vm_ppc.dasc')
-rw-r--r-- | src/vm_ppc.dasc | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/vm_ppc.dasc b/src/vm_ppc.dasc index 461676cd..1a7c31ad 100644 --- a/src/vm_ppc.dasc +++ b/src/vm_ppc.dasc | |||
@@ -1057,7 +1057,7 @@ static void build_subroutines(BuildCtx *ctx) | |||
1057 | | b ->vm_call_dispatch | 1057 | | b ->vm_call_dispatch |
1058 | | | 1058 | | |
1059 | |->vmeta_len: | 1059 | |->vmeta_len: |
1060 | #ifdef LUAJIT_ENABLE_LUA52COMPAT | 1060 | #if LJ_52 |
1061 | | mr SAVE0, CARG1 | 1061 | | mr SAVE0, CARG1 |
1062 | #endif | 1062 | #endif |
1063 | | mr CARG2, RD | 1063 | | mr CARG2, RD |
@@ -1066,7 +1066,7 @@ static void build_subroutines(BuildCtx *ctx) | |||
1066 | | stw PC, SAVE_PC | 1066 | | stw PC, SAVE_PC |
1067 | | bl extern lj_meta_len // (lua_State *L, TValue *o) | 1067 | | bl extern lj_meta_len // (lua_State *L, TValue *o) |
1068 | | // Returns NULL (retry) or TValue * (metamethod base). | 1068 | | // Returns NULL (retry) or TValue * (metamethod base). |
1069 | #ifdef LUAJIT_ENABLE_LUA52COMPAT | 1069 | #if LJ_52 |
1070 | | cmplwi CRET1, 0 | 1070 | | cmplwi CRET1, 0 |
1071 | | bne ->vmeta_binop // Binop call for compatibility. | 1071 | | bne ->vmeta_binop // Binop call for compatibility. |
1072 | | mr CARG1, SAVE0 | 1072 | | mr CARG1, SAVE0 |
@@ -1364,7 +1364,7 @@ static void build_subroutines(BuildCtx *ctx) | |||
1364 | | checktab CARG3 | 1364 | | checktab CARG3 |
1365 | | lwz PC, FRAME_PC(BASE) | 1365 | | lwz PC, FRAME_PC(BASE) |
1366 | | bne ->fff_fallback | 1366 | | bne ->fff_fallback |
1367 | #ifdef LUAJIT_ENABLE_LUA52COMPAT | 1367 | #if LJ_52 |
1368 | | lwz TAB:TMP2, TAB:CARG1->metatable | 1368 | | lwz TAB:TMP2, TAB:CARG1->metatable |
1369 | | lfd f0, CFUNC:RB->upvalue[0] | 1369 | | lfd f0, CFUNC:RB->upvalue[0] |
1370 | | cmplwi TAB:TMP2, 0 | 1370 | | cmplwi TAB:TMP2, 0 |
@@ -1450,7 +1450,7 @@ static void build_subroutines(BuildCtx *ctx) | |||
1450 | | checktab CARG3 | 1450 | | checktab CARG3 |
1451 | | lwz PC, FRAME_PC(BASE) | 1451 | | lwz PC, FRAME_PC(BASE) |
1452 | | bne ->fff_fallback | 1452 | | bne ->fff_fallback |
1453 | #ifdef LUAJIT_ENABLE_LUA52COMPAT | 1453 | #if LJ_52 |
1454 | | lwz TAB:TMP2, TAB:CARG1->metatable | 1454 | | lwz TAB:TMP2, TAB:CARG1->metatable |
1455 | | lfd f0, CFUNC:RB->upvalue[0] | 1455 | | lfd f0, CFUNC:RB->upvalue[0] |
1456 | | cmplwi TAB:TMP2, 0 | 1456 | | cmplwi TAB:TMP2, 0 |
@@ -3297,7 +3297,7 @@ static void build_ins(BuildCtx *ctx, BCOp op, int defop) | |||
3297 | | ins_next2 | 3297 | | ins_next2 |
3298 | |2: | 3298 | |2: |
3299 | | checktab TMP0; bne ->vmeta_len | 3299 | | checktab TMP0; bne ->vmeta_len |
3300 | #ifdef LUAJIT_ENABLE_LUA52COMPAT | 3300 | #if LJ_52 |
3301 | | lwz TAB:TMP2, TAB:CARG1->metatable | 3301 | | lwz TAB:TMP2, TAB:CARG1->metatable |
3302 | | cmplwi TAB:TMP2, 0 | 3302 | | cmplwi TAB:TMP2, 0 |
3303 | | bne >9 | 3303 | | bne >9 |
@@ -3307,7 +3307,7 @@ static void build_ins(BuildCtx *ctx, BCOp op, int defop) | |||
3307 | | bl extern lj_tab_len // (GCtab *t) | 3307 | | bl extern lj_tab_len // (GCtab *t) |
3308 | | // Returns uint32_t (but less than 2^31). | 3308 | | // Returns uint32_t (but less than 2^31). |
3309 | | b <1 | 3309 | | b <1 |
3310 | #ifdef LUAJIT_ENABLE_LUA52COMPAT | 3310 | #if LJ_52 |
3311 | |9: | 3311 | |9: |
3312 | | lbz TMP0, TAB:TMP2->nomm | 3312 | | lbz TMP0, TAB:TMP2->nomm |
3313 | | andix. TMP0, TMP0, 1<<MM_len | 3313 | | andix. TMP0, TMP0, 1<<MM_len |