mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
55 lines
1.8 KiB
Lua
55 lines
1.8 KiB
Lua
-- src/scrcmd.c:92-97, src/script.c:70
|
|
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local T = require("tests.harness")
|
|
local check, eq = T.check, T.eq
|
|
love = love or require("tests.love_stub")
|
|
|
|
local Ctx = require("src.core.game3.scripting.ctx")
|
|
local Flags = require("src.core.game3.scripting.flags")
|
|
local Ops = require("src.core.game3.scripting.ops_a")
|
|
local Natives = require("src.core.game3.scripting.natives")
|
|
|
|
local store = Flags.newStore()
|
|
local logs = {}
|
|
local function vm()
|
|
return {
|
|
ctx = (function() local c = Ctx.new({}); c.mode, c.status = "bytecode", "running"; return c end)(),
|
|
store = store,
|
|
adapters = { log = function(m) logs[#logs + 1] = m end },
|
|
setPc = function() end,
|
|
}
|
|
end
|
|
|
|
local v1 = vm()
|
|
eq(Ops.dispatch(v1, { op = "gotonative", [1] = 0x1234 }), false, "unmapped gotonative skips")
|
|
eq(#logs, 1, "the miss is logged once")
|
|
Ops.dispatch(v1, { op = "gotonative", [1] = 0x1234 })
|
|
eq(#logs, 1, "a repeated miss does not spam the log")
|
|
|
|
local calls = 0
|
|
Natives.NATIVE_SYMBOLS[0x100] = "test_native"
|
|
local saved = Natives.ALLOW["native:test_native"]
|
|
Natives.ALLOW["native:test_native"] = function(ctx)
|
|
calls = calls + 1
|
|
return true
|
|
end
|
|
local v2 = vm()
|
|
eq(Ops.dispatch(v2, { op = "gotonative", [1] = 0x100 }), true,
|
|
"a registered symbol yields like a native that parks the script")
|
|
eq(calls, 1, "the registered handler ran exactly once")
|
|
Natives.ALLOW["native:test_native"] = saved
|
|
Natives.NATIVE_SYMBOLS[0x100] = nil
|
|
|
|
local calls2 = 0
|
|
Natives.ALLOW["native:0x77"] = nil
|
|
local saved2 = Natives.ALLOW["native:55"]
|
|
Natives.ALLOW["native:55"] = function() calls2 = calls2 + 1 return false end
|
|
local v3 = vm()
|
|
eq(Ops.dispatch(v3, { op = "gotonative", [1] = 55 }), false, "direct id registration resolves (no yield)")
|
|
eq(calls2, 1, "the direct handler ran")
|
|
Natives.ALLOW["native:55"] = saved2
|
|
|
|
T.finish("game3_gotonative_test")
|