diff --git a/bench/BenchAll.hs b/bench/BenchAll.hs index 8bd516e48..f9c489022 100644 --- a/bench/BenchAll.hs +++ b/bench/BenchAll.hs @@ -424,4 +424,8 @@ main = do , bench "groupBy (>=)" $ nf (L.groupBy (>=)) zeroes , bench "groupBy (>)" $ nf (L.groupBy (>)) zeroes ] + , bgroup "findIndex" + [ bench "findIndices" $ nf (sum . S.findIndices even) byteStringData + , bench "find" $ nf (S.find (>= 9998)) byteStringData + ] ]