luau/bench/gc/test_GC_Tree_Pruning_Lazy.lua

57 lines
1.2 KiB
Lua

local bench = script and require(script.Parent.bench_support) or require("bench_support")
function test()
local count = 1
local function fill_tree(tree, levels)
local left = tree.left;
local right = tree.right;
if not left then
left = { id = count }
count = count + 1
end
if not right then
right = { id = count }
count = count + 1
end
if levels ~= 0 then
fill_tree(left, levels - 1)
fill_tree(right, levels - 1)
end
tree.left = left;
tree.right = right;
end
local function prune_tree(tree, level)
if tree.left then
if math.random() > 0.9 - level * 0.05 then
tree.left = nil
else
prune_tree(tree.left, level + 1)
end
end
if tree.right then
if math.random() > 0.9 - level * 0.05 then
tree.right = nil
else
prune_tree(tree.right, level + 1)
end
end
end
local tree = { id = 0 }
for i = 1,100 do
fill_tree(tree, 10)
prune_tree(tree, 0)
end
end
bench.runCode(test, "GC: tree pruning (lazy fill)")