@@ -56,7 +56,13 @@ o_1_space_joining value =
5656 (value `div` 2))
5757 , benchIOSrc fromSerial "zipAsyncAp (2,x/2)" (zipAsyncAp (value `div` 2))
5858 , benchIOSink value "fmap zipAsyncly" $ fmapN S.fromZipAsync 1
59− , fromZipAsyncTraverse "ZipAsync Applicative (x/100)" (value `div` 100)
59+ ]
60+ ]
61+
62+o_n_heap_joining :: Int -> [Benchmark]
63+o_n_heap_joining value =
64+ [ bgroup "joining"
65+ [ fromZipAsyncTraverse "ZipAsync Applicative (x/100)" (value `div` 100)
6066 ]
6167 ]
6268
@@ -85,4 +91,5 @@ main = runWithCLIOpts defaultStreamSize allBenchmarks
8591 [ o_1_space_joining size
8692 , o_1_space_outerProduct size
8793 ]
94+ , bgroup (o_n_heap_prefix moduleName) $ o_n_heap_joining size
8895 ]