From fd1495324a394a4836c5e1da49981b6a290b7cf3 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=E7=8C=97=E9=9C=B2?= <69190413+illusory0x0@users.noreply.github.com> Date: Thu, 30 Jan 2025 10:00:48 +0800 Subject: [PATCH] add benchmark --- benchs/run_benchs.ml | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/benchs/run_benchs.ml b/benchs/run_benchs.ml index ca50ad18..306a7eab 100644 --- a/benchs/run_benchs.ml +++ b/benchs/run_benchs.ml @@ -1153,12 +1153,14 @@ module Iter_ = struct let bench_to_array n = let iter () = Iter.to_array Iter.(1 -- n) and gen () = Gen.to_array Gen.(1 -- n) - and oseq () = OSeq.to_array OSeq.(1 -- n) in + and oseq () = OSeq.to_array OSeq.(1 -- n) + and of_iter () = CCArray.of_iter Iter.(1 -- n) in B.throughputN 3 ~repeat [ "iter.to_array", iter, (); "gen.to_array", gen, (); "oseq.to_array", oseq, (); + "ccarray.of_iter", of_iter, (); ] let bench_cons n =