Revert "decimal: Add detailed benchmarks for unbounded decimal numbers"

This reverts commit 667a713.

Author: Bodigrim

bench/BenchDecimalUnbounded.hs

@@ -2,35 +2,31 @@
 -- Copyright:   (c) 2022 Andrew Lelechenko
 -- Licence:     BSD3
 -- Maintainer:  Andrew Lelechenko <[email protected]>
+
 module Main where
 
 import Test.Tasty.Bench
 import Test.Tasty.Patterns.Printer
 
 import BenchChar
 import BenchDecimal
-import BenchDecimalUnbounded (benchDecimalUnbounded)
 import BenchDouble
 import BenchHexadecimal
 import BenchText
 
 main ∷ IO ()
-main =
-  defaultMain $
-    map (mapLeafBenchmarks addCompare) $
-      [ benchText
-      , benchChar
-      , benchDecimal
-      , benchDecimalUnbounded
-      , benchHexadecimal
-      , benchDouble
-      ]
+main = defaultMain $ map (mapLeafBenchmarks addCompare) $
+  [ benchText
+  , benchChar
+  , benchDecimal
+  , benchHexadecimal
+  , benchDouble
+  ]
 
-textBenchName ∷ String
--- textBenchName = "Data.Text.Lazy.Builder"
-textBenchName = "Data.ByteString.Builder"
+textBenchName :: String
+textBenchName = "Data.Text.Lazy.Builder"
 
-addCompare ∷ ([String] → Benchmark → Benchmark)
+addCompare :: ([String] -> Benchmark -> Benchmark)
 addCompare (name : path)
   | name /= textBenchName = bcompare (printAwkExpr (locateBenchmark (textBenchName : path)))
 addCompare _ = id

bench/Main.hs

@@ -80,7 +80,6 @@ benchmark linear-builder-bench
     other-modules:
         BenchChar
         BenchDecimal
-        BenchDecimalUnbounded
         BenchDouble
         BenchHexadecimal
         BenchText