mirror of
https://github.com/luau-lang/luau.git
synced 2024-12-13 05:20:38 +00:00
aafea36235
Previous benchmark require fix wasn't actually working correctly for the old style require (or running in Lua).
57 lines
1.4 KiB
Lua
57 lines
1.4 KiB
Lua
local function prequire(name) local success, result = pcall(require, name); return if success then result else nil end
|
|
local bench = script and require(script.Parent.bench_support) or prequire("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)")
|