We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 3e60f3a commit 97599c0Copy full SHA for 97599c0
benchmarks/Sequence.hs
@@ -36,7 +36,8 @@ main = do
36
[ bench "ix10000/5000" $ nf (\(xs,ys) -> S.zip xs ys `S.index` 5000) (s10000, u10000)
37
, bench "nf100" $ nf (uncurry S.zip) (s100, u100)
38
, bench "nf10000" $ nf (uncurry S.zip) (s10000, u10000)
39
- ] ]
+ ]
40
41
42
-- splitAt+append: repeatedly cut the sequence at a random point
43
-- and rejoin the pieces in the opposite order.
0 commit comments