on master help sign in
Move ZipAsync applicative benchmark to o-n-heap category
734df11Harendra Kumar
benchmark/Streamly/Benchmark/Prelude/ZipAsync.hs+8−1
@@ -56,7 +56,13 @@ o_1_space_joining value =
56 (value `div` 2))
56 (value `div` 2))
57 , benchIOSrc fromSerial "zipAsyncAp (2,x/2)" (zipAsyncAp (value `div` 2))
57 , benchIOSrc fromSerial "zipAsyncAp (2,x/2)" (zipAsyncAp (value `div` 2))
58 , benchIOSink value "fmap zipAsyncly" $ fmapN S.fromZipAsync 1
58 , benchIOSink value "fmap zipAsyncly" $ fmapN S.fromZipAsync 1
59+ ]
60+ ]
61+
62+o_n_heap_joining :: Int -> [Benchmark]
63+o_n_heap_joining value =
64+ [ bgroup "joining"
59− , fromZipAsyncTraverse "ZipAsync Applicative (x/100)" (value `div` 100)
65+ [ fromZipAsyncTraverse "ZipAsync Applicative (x/100)" (value `div` 100)
60 ]
66 ]
61 ]
67 ]
62
68
@@ -85,4 +91,5 @@ main = runWithCLIOpts defaultStreamSize allBenchmarks
85 [ o_1_space_joining size
91 [ o_1_space_joining size
86 , o_1_space_outerProduct size
92 , o_1_space_outerProduct size
87 ]
93 ]
94+ , bgroup (o_n_heap_prefix moduleName) $ o_n_heap_joining size
88 ]
95 ]