simon/iter
1
0
Fork 0
mirror of https://github.com/c-cube/iter.git synced 2025-12-06 03:05:29 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

update benchmarks

Browse source
This commit is contained in:
Simon Cruanes 2016-12-25 20:15:17 +01:00
parent e6af6792d2
commit 4c6cd1560c
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
bench/benchs.ml
View file

@ -10,10 +10,10 @@ let bench_fold n =
0 -- n |> S.fold (+) 0 |> ignore 0 -- n |> S.fold (+) 0 |> ignore
let bench_flatmap n = let bench_flatmap n =
0 -- n |> S.flatMap (fun i -> i -- (i+5)) |> (fun _ -> ()) 0 -- n |> S.flat_map (fun i -> i -- (i+5)) |> (fun _ -> ())
let bench_product n = let bench_product n =
S.product (0 -- n) (0 -- n) (fun (i,j) -> ()) S.product (0 -- n) (0 -- n) (fun _ -> ())
let _ = let _ =
List.iter List.iter