mirror of
https://github.com/luau-lang/luau.git
synced 2024-12-13 21:40:43 +00:00
ce1800746b
Old style require is now called with `pcall` to support comparing against Lua. New style require is now a third option. Edit: this will be a temporary solution until the 'paths' support in .luaurc is fixed.
54 lines
1.3 KiB
Lua
54 lines
1.3 KiB
Lua
local bench = script and require(script.Parent.bench_support) or pcall(require, "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
|
|
|
|
-- create a static tree
|
|
local tree = { id = 0 }
|
|
fill_tree(tree, 16)
|
|
|
|
for i = 1,100 do
|
|
local small_tree = { id = 0 }
|
|
|
|
fill_tree(small_tree, 8)
|
|
|
|
prune_tree(small_tree, 0)
|
|
end
|
|
end
|
|
|
|
bench.runCode(test, "GC: tree pruning (eager fill, gen)")
|