@@ -104,8 +104,6 @@ o_1_space_joining value =
104104 , benchIOSrc1 "concatMapWithZip (+) (2 of n/2)"
105105 (concatMapWithZip 2 (value `div` 2))
106106 -}
107− , benchIOSrc1 "concatPairsWithZip (+) (2 of n/2)"
108− (concatPairsWithZip 2 (value `div` 2))
109107 ]
110108 ]
111109
@@ -138,6 +136,8 @@ o_n_heap_concat value =
138136 (concatPairsWithZip value 1)
139137 , benchIOSrc1 "concatPairsWithZip (sqrtVal of sqrtVal)"
140138 (concatPairsWithZip sqrtVal sqrtVal)
139+ , benchIOSrc1 "concatPairsWithZip (+) (2 of n/2)"
140+ (concatPairsWithZip 2 (value `div` 2))
141141 ]
142142 ]
143143
@@ -176,8 +176,10 @@ main = runWithCLIOpts defaultStreamSize allBenchmarks
176176 [ bgroup (o_1_space_prefix moduleName) $ concat
177177 [ o_1_space_joining size
178178 , o_1_space_mapping size
179− , o_n_heap_concat size
180179 -- XXX need to fix, timing in ns
181180 -- , o_1_space_outerProduct size
182181 ]
182+ , bgroup (o_n_heap_prefix moduleName) $ concat
183+ [ o_n_heap_concat size
184+ ]
183185 ]