mirror of
https://github.com/luau-lang/luau.git
synced 2024-12-13 13:30:40 +00:00
50 lines
1.1 KiB
Lua
50 lines
1.1 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)
|
|
if not tree.left then
|
|
tree.left = { id = count }
|
|
count = count + 1
|
|
end
|
|
|
|
if not tree.right then
|
|
tree.right = { id = count }
|
|
count = count + 1
|
|
end
|
|
|
|
if levels ~= 0 then
|
|
fill_tree(tree.left, levels - 1)
|
|
fill_tree(tree.right, levels - 1)
|
|
end
|
|
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 (eager fill)")
|