Use Fun.id in BenchSet

goblint · Mar 14, 2023 · 34a0193 · 34a0193
1 parent 8d12ab3
commit 34a0193
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/bench/basic/benchSet.ml b/bench/basic/benchSet.ml
@@ -5,7 +5,7 @@ open Benchmark.Tree
 
 module IS = Set.Make (Int)
 
-let set1 = IS.of_seq (Seq.init 1024 (fun i -> i))
+let set1 = IS.of_seq (Seq.init 1024 Fun.id)
 let set2 = IS.of_seq (Seq.init 1024 (fun i -> i + 1))
 let set3 = IS.of_seq (Seq.init 1024 (fun i -> i - 1))