OEVGandClaude Sonnet 5.5
00c7860f31
Squashed history of the earlier README and patch commits. Original history kept locally on branch backup/pre-squash. Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_019W3rwtugSE5NbbiWQCbbKX
72 lines
2.7 KiB
Lua
72 lines
2.7 KiB
Lua
-- WoW + ClassicAPI stubs
|
|
format = string.format
|
|
local now = 1000
|
|
function GetTime() return now end
|
|
local combat, speed, falling = false, 7, false
|
|
function UnitAffectingCombat() return combat end
|
|
function UnitIsAFK() return false end
|
|
function GetUnitSpeed(u) return speed, 7, 0, 4.7 end
|
|
function IsFalling() return falling end
|
|
local log = {}
|
|
DEFAULT_CHAT_FRAME = { AddMessage = function(_, m) table.insert(log, m); print(" " .. m) end }
|
|
SlashCmdList = {}
|
|
local tickerFn, tickerPeriod
|
|
C_Timer = { NewTicker = function(p, f) tickerPeriod, tickerFn = p, f; return {} end }
|
|
FRAMES = {}
|
|
function CreateFrame()
|
|
local F = { scripts = {} }
|
|
function F:RegisterEvent() end
|
|
function F:UnregisterEvent() end
|
|
function F:SetScript(k, f) self.scripts[k] = f end
|
|
table.insert(FRAMES, F)
|
|
return F
|
|
end
|
|
local function fire(e, a1) event, arg1 = e, a1; F.scripts.OnEvent() end
|
|
local function seconds(n) for i = 1, n do now = now + 1; tickerFn() end end
|
|
|
|
LIVE = {}
|
|
for i = 1, 300000 do LIVE[i] = { i } end
|
|
local function makeGarbage(mb) local t = {}; for i = 1, mb * 6000 do t[i] = { i, i } end end
|
|
local function count(pat) local n = 0; for _, m in ipairs(log) do if string.find(m, pat) then n = n + 1 end end; return n end
|
|
local function check(name, c) print((c and "PASS " or "FAIL ") .. name); if not c then FAILED = true end end
|
|
|
|
collectgarbage()
|
|
dofile(arg[1])
|
|
F = FRAMES[1]
|
|
HF = FRAMES[2]
|
|
fire("ADDON_LOADED", "GentleGC")
|
|
SlashCmdList.GENTLEGC("debug 2")
|
|
|
|
check("C_Timer ticker used (1s)", tickerFn ~= nil and tickerPeriod == 1)
|
|
check("no frame OnUpdate when C_Timer exists", F.scripts.OnUpdate == nil)
|
|
|
|
makeGarbage(12)
|
|
speed = 7; seconds(10)
|
|
check("no stand-still collection while moving", count("standing still:") == 0)
|
|
|
|
speed = 0; seconds(2)
|
|
check("not yet after 2s still", count("standing still:") == 0)
|
|
seconds(2)
|
|
check("collects after 3s standing still", count("standing still:") == 1)
|
|
|
|
seconds(20)
|
|
check("does not repeat while still with no new garbage", count("standing still:") == 1)
|
|
SlashCmdList.GENTLEGC("status")
|
|
check("idle retries don't inflate skip count", count("collections, 0 skipped") == 1)
|
|
|
|
makeGarbage(12); seconds(15)
|
|
check("respects minInterval, then collects again", count("standing still:") == 2)
|
|
|
|
makeGarbage(12); falling = true; speed = 0; now = now + 60; seconds(5)
|
|
check("falling is not standing still", count("standing still:") == 2)
|
|
falling = false
|
|
|
|
combat = true; fire("PLAYER_REGEN_DISABLED"); seconds(10)
|
|
check("never while in combat", count("standing still:") == 2)
|
|
combat = false; fire("PLAYER_REGEN_ENABLED")
|
|
|
|
SlashCmdList.GENTLEGC("still 0"); makeGarbage(12); now = now + 60; seconds(10)
|
|
check("still 0 disables it", count("standing still:") == 2 or count("standing still:") == 3 and false)
|
|
|
|
print(FAILED and "SOME TESTS FAILED" or "ALL TESTS PASSED")
|