diff options
-rw-r--r-- | src/vm_arm.dasc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/vm_arm.dasc b/src/vm_arm.dasc index 82cba909..0865d016 100644 --- a/src/vm_arm.dasc +++ b/src/vm_arm.dasc | |||
@@ -335,7 +335,7 @@ static void build_subroutines(BuildCtx *ctx) | |||
335 | | // - The GC shrinks the stack in between. | 335 | | // - The GC shrinks the stack in between. |
336 | | // - A return back from a lua_call() with (high) nresults adjustment. | 336 | | // - A return back from a lua_call() with (high) nresults adjustment. |
337 | | str BASE, L->top // Save current top held in BASE (yes). | 337 | | str BASE, L->top // Save current top held in BASE (yes). |
338 | | mov CARG2, KBASE | 338 | | lsr CARG2, KBASE, #3 |
339 | | mov CARG1, L | 339 | | mov CARG1, L |
340 | | bl extern lj_state_growstack // (lua_State *L, int n) | 340 | | bl extern lj_state_growstack // (lua_State *L, int n) |
341 | | ldr BASE, L->top // Need the (realloced) L->top in BASE. | 341 | | ldr BASE, L->top // Need the (realloced) L->top in BASE. |
@@ -389,7 +389,7 @@ static void build_subroutines(BuildCtx *ctx) | |||
389 | | str BASE, L->base | 389 | | str BASE, L->base |
390 | | add PC, PC, #4 // Must point after first instruction. | 390 | | add PC, PC, #4 // Must point after first instruction. |
391 | | str RC, L->top | 391 | | str RC, L->top |
392 | | lsr CARG3, RA, #3 | 392 | | lsr CARG2, RA, #3 |
393 | |2: | 393 | |2: |
394 | | // L->base = new base, L->top = top | 394 | | // L->base = new base, L->top = top |
395 | | str PC, SAVE_PC | 395 | | str PC, SAVE_PC |