diff options
-rw-r--r-- | src/ldo.js | 2 | ||||
-rw-r--r-- | src/ltm.js | 6 | ||||
-rw-r--r-- | src/lvm.js | 3 |
3 files changed, 6 insertions, 5 deletions
@@ -233,7 +233,7 @@ const tryfuncTM = function(L, off, func) { for (let p = L.top; p > off; p--) L.stack[p] = L.stack[p-1]; L.top++; /* slot ensured by caller */ - L.stack[off] = tm; /* tag method is the new function to be called */ + L.stack[off] = new lobject.TValue(tm.type, tm.value); /* tag method is the new function to be called */ }; /* @@ -83,9 +83,9 @@ const luaT_callTM = function(L, f, p1, p2, p3, hasres) { let result = p3; let func = L.top; - L.stack[L.top] = f; /* push function (assume EXTRA_STACK) */ - L.stack[L.top + 1] = p1; /* 1st argument */ - L.stack[L.top + 2] = p2; /* 2nd argument */ + L.stack[L.top] = new lobject.TValue(f.type, f.value); /* push function (assume EXTRA_STACK) */ + L.stack[L.top + 1] = new lobject.TValue(p1.type, p1.value); /* 1st argument */ + L.stack[L.top + 2] = new lobject.TValue(p2.type, p2.value); /* 2nd argument */ L.top += 3; if (!hasres) /* no result? 'p3' is third argument */ @@ -161,7 +161,8 @@ const luaV_execute = function(L) { break; } case OCi.OP_GETUPVAL: { - L.stack[ra] = cl.upvals[i.B].val(L); + let o = cl.upvals[i.B].val(L); + L.stack[ra] = new lobject.TValue(o.type, o.value); break; } case OCi.OP_SETUPVAL: { |