diff options
Diffstat (limited to 'lvm.c')
| -rw-r--r-- | lvm.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -268,9 +268,9 @@ static int forprep (lua_State *L, StkId ra) { | |||
| 268 | /* | 268 | /* |
| 269 | ** Execute a step of a float numerical for loop, returning | 269 | ** Execute a step of a float numerical for loop, returning |
| 270 | ** true iff the loop must continue. (The integer case is | 270 | ** true iff the loop must continue. (The integer case is |
| 271 | ** written online with opcode OP_FORLOOP, for performance.) | 271 | ** written inline with opcode OP_FORLOOP, for performance.) |
| 272 | */ | 272 | */ |
| 273 | static int floatforloop (StkId ra) { | 273 | static int floatforloop (lua_State *L, StkId ra) { |
| 274 | lua_Number step = fltvalue(s2v(ra + 1)); | 274 | lua_Number step = fltvalue(s2v(ra + 1)); |
| 275 | lua_Number limit = fltvalue(s2v(ra)); | 275 | lua_Number limit = fltvalue(s2v(ra)); |
| 276 | lua_Number idx = fltvalue(s2v(ra + 2)); /* control variable */ | 276 | lua_Number idx = fltvalue(s2v(ra + 2)); /* control variable */ |
| @@ -1841,7 +1841,7 @@ void luaV_execute (lua_State *L, CallInfo *ci) { | |||
| 1841 | pc -= GETARG_Bx(i); /* jump back */ | 1841 | pc -= GETARG_Bx(i); /* jump back */ |
| 1842 | } | 1842 | } |
| 1843 | } | 1843 | } |
| 1844 | else if (floatforloop(ra)) /* float loop */ | 1844 | else if (floatforloop(L, ra)) /* float loop */ |
| 1845 | pc -= GETARG_Bx(i); /* jump back */ | 1845 | pc -= GETARG_Bx(i); /* jump back */ |
| 1846 | updatetrap(ci); /* allows a signal to break the loop */ | 1846 | updatetrap(ci); /* allows a signal to break the loop */ |
| 1847 | vmbreak; | 1847 | vmbreak; |
