on master help sign in
Reclassify concatPairWith zipping benchmarks under o-n-heap
96fea1eAdithya Kumar
benchmark/Streamly/Benchmark/Prelude/ZipSerial.hs+5−3
@@ -104,8 +104,6 @@ o_1_space_joining value =
104 , benchIOSrc1 "concatMapWithZip (+) (2 of n/2)"
104 , benchIOSrc1 "concatMapWithZip (+) (2 of n/2)"
105 (concatMapWithZip 2 (value `div` 2))
105 (concatMapWithZip 2 (value `div` 2))
106 -}
106 -}
107− , benchIOSrc1 "concatPairsWithZip (+) (2 of n/2)"
108− (concatPairsWithZip 2 (value `div` 2))
109 ]
107 ]
110 ]
108 ]
111
109
@@ -138,6 +136,8 @@ o_n_heap_concat value =
138 (concatPairsWithZip value 1)
136 (concatPairsWithZip value 1)
139 , benchIOSrc1 "concatPairsWithZip (sqrtVal of sqrtVal)"
137 , benchIOSrc1 "concatPairsWithZip (sqrtVal of sqrtVal)"
140 (concatPairsWithZip sqrtVal sqrtVal)
138 (concatPairsWithZip sqrtVal sqrtVal)
139+ , benchIOSrc1 "concatPairsWithZip (+) (2 of n/2)"
140+ (concatPairsWithZip 2 (value `div` 2))
141 ]
141 ]
142 ]
142 ]
143
143
@@ -176,8 +176,10 @@ main = runWithCLIOpts defaultStreamSize allBenchmarks
176 [ bgroup (o_1_space_prefix moduleName) $ concat
176 [ bgroup (o_1_space_prefix moduleName) $ concat
177 [ o_1_space_joining size
177 [ o_1_space_joining size
178 , o_1_space_mapping size
178 , o_1_space_mapping size
179− , o_n_heap_concat size
180 -- XXX need to fix, timing in ns
179 -- XXX need to fix, timing in ns
181 -- , o_1_space_outerProduct size
180 -- , o_1_space_outerProduct size
182 ]
181 ]
182+ , bgroup (o_n_heap_prefix moduleName) $ concat
183+ [ o_n_heap_concat size
184+ ]
183 ]
185 ]