on master help sign in
Fix spellings
commitad91b860545d5507ef1d6e2b508186ca8b6a226a authorHarendra Kumar <harendra@composewell.com> dateSun 24 Apr 2022, 18:14 (4 years ago) parent8db1fcb
1 file changed+12−12
benchmark/report/Main.hs+12−12
benchmark/report/Main.hs+12−12
@@ -1,9 +1,9 @@
11module Main where
22
3−import BuildLib (Quickness(..))
43import BenchRunner (mainWith)
5−import Data.Map (Map)
4+import BuildLib (Quickness(..))
65import Data.List (isInfixOf, isPrefixOf, isSuffixOf)
6+import Data.Map (Map)
77
88import qualified Data.Map as Map
99
@@ -15,8 +15,8 @@ groupTargets =
1515 , "Data.Stream.StreamK"
1616 , "Data.Stream.StreamDK"
1717 ])
18− , ("prelude_serial_grp", preudeSerialGrp)
19− , ("prelude_concurrent_grp", preudeConcurrentGrp)
18+ , ("prelude_serial_grp", preludeSerialGrp)
19+ , ("prelude_concurrent_grp", preludeConcurrentGrp)
2020 , ( "prelude_other_grp"
2121 , ["Prelude.Rate", "Prelude.Concurrent", "Prelude.Adaptive"])
2222 , ( "array_grp"
@@ -30,13 +30,13 @@ groupTargets =
3030 , ("parser_grp", ["Data.Fold", "Data.Parser"])
3131 , ("list_grp ", [])
3232 , ( "infinite_grp"
33− , preudeSerialGrp ++ preudeConcurrentGrp ++ ["Prelude.Rate"])
33+ , preludeSerialGrp ++ preludeConcurrentGrp ++ ["Prelude.Rate"])
3434 ]
3535
3636 where
3737
38− preudeSerialGrp = ["Prelude.Serial", "Prelude.WSerial", "Prelude.ZipSerial"]
39− preudeConcurrentGrp =
38+ preludeSerialGrp = ["Prelude.Serial", "Prelude.WSerial", "Prelude.ZipSerial"]
39+ preludeConcurrentGrp =
4040 [ "Prelude.Async"
4141 , "Prelude.WAsync"
4242 , "Prelude.Ahead"
@@ -44,8 +44,8 @@ groupTargets =
4444 , "Prelude.ZipAsync"
4545 ]
4646
47−individualTargers :: [String]
48−individualTargers =
47+individualTargets :: [String]
48+individualTargets =
4949 [ "Data.Unfold"
5050 , "Unicode.Stream"
5151 , "Unicode.Char"
@@ -53,8 +53,8 @@ individualTargers =
5353 , "FileSystem.Handle"
5454 ]
5555
56−comparisions :: Map String [String]
57−comparisions =
56+comparisons :: Map String [String]
57+comparisons =
5858 Map.fromList
5959 [ ("base_stream_cmp", ["Data.Stream.StreamD", "Data.Stream.StreamK"])
6060 , ("serial_wserial_cmp", ["Prelude.Serial", "Prelude.WSerial"])
@@ -195,4 +195,4 @@ speedOpts exeName benchName0 = maybe benchSpecific Just exeSpecific
195195 | otherwise = Nothing
196196
197197main :: IO ()
198−main = mainWith groupTargets individualTargers comparisions speedOpts rtsOpts
198+main = mainWith groupTargets individualTargets comparisons speedOpts rtsOpts