git.iko.soy/streamly
on master help sign in
disable map-and-filter composition benchmarks for GHC-8.2
6ab3ce0Harendra Kumar
benchmark/BaseStreams.hs+4
compare with master
unifiedsplit
@@ -5,6 +5,8 @@
5-- License : BSD3
5-- License : BSD3
6-- Maintainer : harendra.kumar@gmail.com
6-- Maintainer : harendra.kumar@gmail.com
7
7
8+{-# LANGUAGE CPP #-}
9+
8import Control.DeepSeq (NFData)
10import Control.DeepSeq (NFData)
9-- import Data.Functor.Identity (Identity, runIdentity)
11-- import Data.Functor.Identity (Identity, runIdentity)
10import System.Random (randomRIO)
12import System.Random (randomRIO)
@@ -62,9 +64,11 @@ main = do
62 , benchIO "zip" D.zip D.sourceUnfoldrM
64 , benchIO "zip" D.zip D.sourceUnfoldrM
63 , bgroup "compose"
65 , bgroup "compose"
64 [ benchIO "mapM" D.composeMapM D.sourceUnfoldrM
66 [ benchIO "mapM" D.composeMapM D.sourceUnfoldrM
67+#if __GLASGOW_HASKELL__ != 802
65 , benchIO "map-with-all-in-filter" D.composeMapAllInFilter D.sourceUnfoldrM
68 , benchIO "map-with-all-in-filter" D.composeMapAllInFilter D.sourceUnfoldrM
66 , benchIO "all-in-filters" D.composeAllInFilters D.sourceUnfoldrM
69 , benchIO "all-in-filters" D.composeAllInFilters D.sourceUnfoldrM
67 , benchIO "all-out-filters" D.composeAllOutFilters D.sourceUnfoldrM
70 , benchIO "all-out-filters" D.composeAllOutFilters D.sourceUnfoldrM
71+#endif
68 ]
72 ]
69 -- Scaling with same operation in sequence
73 -- Scaling with same operation in sequence
70 , bgroup "compose-scaling"
74 , bgroup "compose-scaling"