bench/list/at_bench.rb
require "benchmark/ips"
require "hamster/list"
Benchmark.ips do |b|
sml_list = Hamster::List[1]
# med_list = Hamster.iterate(1, &:next).take(100)
# lrg_list = Hamster.iterate(1, &:next).take(10000)
med_list = Hamster::List.empty
100.times { |i| med_list = med_list.cons(i) }
lrg_list = Hamster::List.empty
10000.times { |i| lrg_list = lrg_list.cons(i) }
b.report "at small" do |n|
a = 0
x = 0
while a < n
x = sml_list.at(0)
a += 1
end
end
b.report "at medium" do |n|
a = 0
x = 0
while a < n
x = med_list.at(99)
a += 1
end
end
b.report "at large" do |n|
a = 0
x = 0
while a < n
x = lrg_list.at(9999)
a += 1
end
end
end