commit 25be0be83e327f3e3c94203ff7271c540e24d7fa
parent 442f3d2c4db38abd01e8f203b6cbcf8a5fda3935
Author: Jared Tobin <jared@jtobin.io>
Date: Wed, 29 Jan 2025 20:01:38 +0400
bench: tweaks
Diffstat:
1 file changed, 14 insertions(+), 7 deletions(-)
diff --git a/bench/Main.hs b/bench/Main.hs
@@ -5,7 +5,6 @@
module Main where
import Criterion.Main
-import Data.Bits ((.|.), (.&.), (.^.))
import qualified Data.Bits as B
import qualified Data.Primitive.PrimArray as PA
import qualified Data.Word.Extended as W
@@ -13,31 +12,39 @@ import Data.Word (Word64)
import Prelude hiding (or, and, div, mod)
import qualified Prelude (div)
+add_sub :: Benchmark
add_sub = bgroup "addition & subtraction" [
add
+ , add_baseline
, sub
+ , sub_baseline
]
+multiplication :: Benchmark
multiplication = bgroup "multiplication" [
mul
+ , mul_baseline
]
+division :: Benchmark
division = bgroup "division" [
div
, div_baseline
, mod
, mod_baseline
- , recip_2by1
- , quotrem_by1
- , rem_by1
- , quotrem_2by1
- , quot_r
- , quotrem_r
+ -- , recip_2by1
+ -- , quotrem_by1
+ -- , rem_by1
+ -- , quotrem_2by1
+ -- , quot_r
+ -- , quotrem_r
]
main :: IO ()
main = defaultMain [
division
+ , multiplication
+ , add_sub
]
-- addition and subtraction ---------------------------------------------------