Permalink
Browse files

Add explicit benchmarks for integer identity

  • Loading branch information...
1 parent 6881817 commit 98315e95fd01e1979091f2faf7c9e775a6956b6f @bos committed Oct 13, 2012
Showing with 3 additions and 1 deletion.
  1. +3 −1 benchmarks/Benchmarks.hs
@@ -161,7 +161,9 @@ main = do
, bench "2^20" $ whnf hsSipHash bs1Mb
]
, bgroup "Int"
- [ bench "wang32" $ whnf hash_wang_32 0xdeadbeef
+ [ bench "id32" $ whnf id (0x7eadbeef :: Int32)
+ , bench "id64" $ whnf id (0x7eadbeefdeadbeef :: Int64)
+ , bench "wang32" $ whnf hash_wang_32 0xdeadbeef
, bench "wang64" $ whnf hash_wang_64 0xdeadbeefdeadbeef
, bench "jenkins32a" $ whnf hash_jenkins_32a 0xdeadbeef
, bench "jenkins32b" $ whnf hash_jenkins_32b 0xdeadbeef

0 comments on commit 98315e9

Please sign in to comment.