git.iko.soy/streamly
on master help sign in
Fix benchmark name prefixes to module names
d51fab4Harendra Kumar
benchmark/Streamly/Benchmark/Data/Array.hs+1−1
compare with master
unifiedsplit
@@ -165,7 +165,7 @@ moduleName :: String
165#ifdef DATA_SMALLARRAY
165#ifdef DATA_SMALLARRAY
166moduleName = "Data.SmallArray"
166moduleName = "Data.SmallArray"
167#elif defined(MEMORY_ARRAY)
167#elif defined(MEMORY_ARRAY)
168−moduleName = "Memory.Array"
168+moduleName = "Data.Array.Foreign"
169#elif defined(DATA_ARRAY_PRIM)
169#elif defined(DATA_ARRAY_PRIM)
170moduleName = "Data.Array.Prim"
170moduleName = "Data.Array.Prim"
171#elif defined(DATA_ARRAY_PRIM_PINNED)
171#elif defined(DATA_ARRAY_PRIM_PINNED)
benchmark/Streamly/Benchmark/Prelude/Adaptive.hs+8−1
@@ -19,6 +19,9 @@ import System.Random (randomRIO)
19-- Also, the worker dispatch depends on the worker dispatch latency which is
19-- Also, the worker dispatch depends on the worker dispatch latency which is
20-- set to fixed 200 us. We need to keep that in mind when designing tests.
20-- set to fixed 200 us. We need to keep that in mind when designing tests.
21
21
22+moduleName :: String
23+moduleName = "Prelude.Adaptive"
24+
22value :: Int
25value :: Int
23value = 1000
26value = 1000
24
27
@@ -78,7 +81,11 @@ randomVar = run (low,high) (low,high)
78
81
79main :: IO ()
82main :: IO ()
80main =
83main =
81− defaultMain
84+ defaultMain [bgroup moduleName allBenchmarks]
85+
86+ where
87+
88+ allBenchmarks =
82 [
89 [
83 bgroup "serialConstantSlowConsumer"
90 bgroup "serialConstantSlowConsumer"
84 [ bench "serially" $ nfIO $ alwaysConstSlowSerial fromSerial
91 [ bench "serially" $ nfIO $ alwaysConstSlowSerial fromSerial