Fix benchmark name prefixes to module names

Otherwise the new bench.sh changes for tasy-bench won't work for these
modules.

benchmark/Streamly/Benchmark/Data/Array.hs

@@ -165,7 +165,7 @@ moduleName :: String
 #ifdef DATA_SMALLARRAY
 moduleName = "Data.SmallArray"
 #elif defined(MEMORY_ARRAY)
-moduleName = "Memory.Array"
+moduleName = "Data.Array.Foreign"
 #elif defined(DATA_ARRAY_PRIM)
 moduleName = "Data.Array.Prim"
 #elif defined(DATA_ARRAY_PRIM_PINNED)

benchmark/Streamly/Benchmark/Prelude/Adaptive.hs

@@ -19,6 +19,9 @@ import System.Random (randomRIO)
 -- Also, the worker dispatch depends on the worker dispatch latency which is
 -- set to fixed 200 us. We need to keep that in mind when designing tests.
 
+moduleName :: String
+moduleName = "Prelude.Adaptive"
+
 value :: Int
 value = 1000
 
@@ -78,7 +81,11 @@ randomVar = run (low,high) (low,high)
 
 main :: IO ()
 main =
-  defaultMain
+  defaultMain [bgroup moduleName allBenchmarks]
+
+  where
+
+  allBenchmarks =
     [
       bgroup "serialConstantSlowConsumer"
       [ bench "serially"    $ nfIO $ alwaysConstSlowSerial fromSerial