Add longer fromList benchmark
authorDavid Feuer <David.Feuer@gmail.com>
Tue, 14 Jun 2016 22:33:14 +0000 (18:33 -0400)
committerDavid Feuer <David.Feuer@gmail.com>
Tue, 14 Jun 2016 22:33:14 +0000 (18:33 -0400)
The previous benchmarks weren't big enough to reveal certain
cache effects.

benchmarks/Sequence.hs

index 527020b..99d1ca4 100644 (file)
@@ -40,6 +40,7 @@ main = do
          , bench "100" $ nf S.fromList [(0 :: Int)..99]
          , bench "1000" $ nf S.fromList [(0 :: Int)..999]
          , bench "10000" $ nf S.fromList [(0 :: Int)..9999]
+         , bench "100000" $ nf S.fromList [(0 :: Int)..99999]
          ]
       , bgroup "partition"
          [ bench "10" $ nf (S.partition even) s10