mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-27 05:55:56 -04:00
bryanthaboi
74 lines
2.6 KiB
Lua
74 lines
2.6 KiB
Lua
-- T4: FireRed mod API parity, read from src/mods/Gen3Compat.lua and the
|
|
-- per-generation mod.world / mod.battle modules at run time.
|
|
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local T = require("tests.modkit")
|
|
|
|
local Gen2Compat = require("src.mods.Gen2Compat")
|
|
local Gen3Compat = require("src.mods.Gen3Compat")
|
|
|
|
for _, fn in ipairs({ "serves", "resolve", "bind", "coverage", "modules",
|
|
"memberStatus", "applyMerged", "scriptCtx" }) do
|
|
T.eq(type(Gen3Compat[fn]), "function", "Gen3Compat." .. fn .. " exists")
|
|
end
|
|
T.eq(type(Gen3Compat.ADAPTERS), "table", "Gen3Compat.ADAPTERS is published")
|
|
T.eq(Gen3Compat.COVERAGE_VERSION, Gen2Compat.COVERAGE_VERSION,
|
|
"both compat layers speak one coverage contract version")
|
|
|
|
for name in pairs(Gen2Compat.ADAPTERS) do
|
|
T.check(Gen3Compat.serves(name),
|
|
"a module Gold adapts is adapted on FireRed too: " .. name)
|
|
end
|
|
for name in pairs(Gen3Compat.ADAPTERS) do
|
|
T.check(Gen2Compat.serves(name),
|
|
"FireRed adapts nothing Gold does not: " .. name)
|
|
local row = Gen3Compat.coverage(name)
|
|
T.check(row ~= nil, "coverage row for " .. name)
|
|
if row then
|
|
T.check(row.kind == "facade" or row.kind == "alias",
|
|
"coverage kind is facade or alias: " .. name)
|
|
for member, status in pairs(row.members) do
|
|
T.check(status == "backed" or status == "warned" or status == "absent",
|
|
("%s.%s carries one of the three statuses"):format(name, member))
|
|
end
|
|
end
|
|
end
|
|
|
|
local function publicMethods(module)
|
|
local out = {}
|
|
for key, value in pairs(module) do
|
|
if type(value) == "function" and not key:find("^_") then out[#out + 1] = key end
|
|
end
|
|
table.sort(out)
|
|
return out
|
|
end
|
|
|
|
local function surface(label, gen3Name, others)
|
|
local ok3, gen3 = pcall(require, gen3Name)
|
|
T.check(ok3, label .. ": " .. gen3Name .. " loads headless")
|
|
if not ok3 then return end
|
|
for _, otherName in ipairs(others) do
|
|
local ok, other = pcall(require, otherName)
|
|
if ok and type(other) == "table" then
|
|
for _, key in ipairs(publicMethods(other)) do
|
|
T.eq(type(gen3[key]), "function",
|
|
("%s: %s.%s has a FireRed arm"):format(label, otherName, key))
|
|
end
|
|
else
|
|
T.check(true, label .. ": " .. otherName .. " not loadable headless, skipped")
|
|
end
|
|
end
|
|
end
|
|
|
|
surface("mod.world", "src.world.game3.WorldAPI",
|
|
{ "src.world.WorldAPI", "src.world.gen2.WorldAPI" })
|
|
surface("mod.battle", "src.battle.game3.BattleAPI",
|
|
{ "src.battle.BattleAPI", "src.battle.gen2.BattleAPI" })
|
|
|
|
local worldRow = Gen3Compat.coverage("src.world.WorldAPI")
|
|
T.eq(worldRow and worldRow.target, "src.world.game3.WorldAPI",
|
|
"the WorldAPI coverage row names the FireRed module")
|
|
|
|
T.finish("gen3check")
|