on master help sign in
Better name for AsyncE benchmarks
da4ca82Andrzej Rybczak
bench/Unlift.hs+2−2
@@ -51,7 +51,7 @@ shallowConc
51 -> Eff '[IOE] ()
51 -> Eff '[IOE] ()
52 -> Benchmark
52 -> Benchmark
53shallowConc name n r f = bgroup name
53shallowConc name n r f = bgroup name
54− [ bench "reference" $ nfAppIO (runShallow . A.runAsyncE) r
54+ [ bench "AsyncE" $ nfAppIO (runShallow . A.runAsyncE) r
55 , bench "ephemeral/limited" $ nfAppIO
55 , bench "ephemeral/limited" $ nfAppIO
56 (runShallow . withUnliftStrategy (ConcUnlift Ephemeral $ Limited n)) f
56 (runShallow . withUnliftStrategy (ConcUnlift Ephemeral $ Limited n)) f
57 , bench "ephemeral/unlimited" $ nfAppIO
57 , bench "ephemeral/unlimited" $ nfAppIO
@@ -74,7 +74,7 @@ deepConc
74 , IOE] ()
74 , IOE] ()
75 -> Benchmark
75 -> Benchmark
76deepConc name n r f = bgroup name
76deepConc name n r f = bgroup name
77− [ bench "reference" $ nfAppIO (runDeep . A.runAsyncE) r
77+ [ bench "AsyncE" $ nfAppIO (runDeep . A.runAsyncE) r
78 , bench "ephemeral/limited" $ nfAppIO
78 , bench "ephemeral/limited" $ nfAppIO
79 (runDeep . withUnliftStrategy (ConcUnlift Ephemeral $ Limited n)) f
79 (runDeep . withUnliftStrategy (ConcUnlift Ephemeral $ Limited n)) f
80 , bench "ephemeral/unlimited" $ nfAppIO
80 , bench "ephemeral/unlimited" $ nfAppIO