summaryrefslogtreecommitdiff
path: root/src/lvm.js
diff options
context:
space:
mode:
authorBenoit Giannangeli <giann008@gmail.com>2017-05-05 15:46:17 +0200
committerBenoit Giannangeli <giann008@gmail.com>2017-05-05 15:46:17 +0200
commitd4aa8fa4e548ef348753ef765f2680f1a188d145 (patch)
tree92663657a52eb529ccc5c64ff70622ae2412deff /src/lvm.js
parent7ef345bee73f6cc843b0d82866d036a3ac5829ca (diff)
parentc7b6fa63459d411cd7b20ea0de3dc2f4cf7e2a2f (diff)
downloadfengari-d4aa8fa4e548ef348753ef765f2680f1a188d145.tar.gz
fengari-d4aa8fa4e548ef348753ef765f2680f1a188d145.tar.bz2
fengari-d4aa8fa4e548ef348753ef765f2680f1a188d145.zip
Merge remote-tracking branch 'daurnimator/fix-errors'
Diffstat (limited to 'src/lvm.js')
-rw-r--r--src/lvm.js37
1 files changed, 14 insertions, 23 deletions
diff --git a/src/lvm.js b/src/lvm.js
index fe0bd0a..9145b88 100644
--- a/src/lvm.js
+++ b/src/lvm.js
@@ -98,36 +98,27 @@ const RKC = function(L, base, k, i) {
};
const luaV_execute = function(L) {
- let OCi = OC.OpCodesI;
+ const OCi = OC.OpCodesI;
let ci = L.ci;
- let specialCase = null; // To enable jump to specific opcode without reading current op/ra
- let opcode, k, base, i, ra;
- var cl;
ci.callstatus |= lstate.CIST_FRESH;
newframe:
for (;;) {
- if (specialCase) {
- opcode = specialCase;
- specialCase = null;
- } else {
- ci = L.ci;
- cl = ci.func.value;
- k = cl.p.k;
- base = ci.l_base;
-
- i = ci.l_savedpc[ci.pcOff++];
-
- if (L.hookmask & (defs.LUA_MASKLINE | defs.LUA_MASKCOUNT)) {
- ldebug.luaG_traceexec(L);
- base = ci.l_base;
- }
+ assert(ci === L.ci);
+ let cl = ci.func.value;
+ let k = cl.p.k;
+ let base = ci.l_base;
+ let i = ci.l_savedpc[ci.pcOff++];
- ra = RA(L, base, i);
- opcode = i.opcode;
+ if (L.hookmask & (defs.LUA_MASKLINE | defs.LUA_MASKCOUNT)) {
+ ldebug.luaG_traceexec(L);
+ base = ci.l_base;
}
+ let ra = RA(L, base, i);
+ let opcode = i.opcode;
+
if (i.breakpoint) // TODO: remove, used until lapi
return;
@@ -628,13 +619,13 @@ const luaV_execute = function(L) {
L.stack[cb] = L.stack[ra];
L.top = cb + 3; /* func. + 2 args (state and index) */
ldo.luaD_call(L, cb, i.C);
+ /* go straight to OP_TFORLOOP */
base = ci.l_base;
L.top = ci.top;
i = ci.l_savedpc[ci.pcOff++];
ra = RA(L, base, i);
assert(i.opcode === OCi.OP_TFORLOOP);
- specialCase = OCi.OP_TFORLOOP;
- break;
+ /* fall through */
}
case OCi.OP_TFORLOOP: {
if (!L.stack[ra + 1].ttisnil()) { /* continue loop? */