cryptohash 0.11.0 → 0.11.1

raw patch · 3 files changed

+4/−4 lines, 3 files

Files

Bench/BenchHMAC.hs +2/−2
Tests/KAT.hs +1/−1
cryptohash.cabal +1/−1

Bench/BenchHMAC.hs view

@@ -7,6 +7,6 @@ main = do     let b32 = B.replicate 32 0     defaultMain-        [ bench "hmac-md5" $ whnf (toBytes . hmac MD5 b32) b32-        , bench "hmac-sha1" $ whnf (toBytes . hmac SHA1 b32) b32+        [ bench "hmac-md5" $ whnf (toBytes . hmacAlg MD5 b32) b32+        , bench "hmac-sha1" $ whnf (toBytes . hmacAlg SHA1 b32) b32         ]

Tests/KAT.hs view

@@ -269,7 +269,7 @@     , testGroup "hmac-sha3-512" $ map (toMACTest SHA3_512) $ zip [0..] sha3_512_MAC_Vectors     ]     where toMACTest hashAlg (i, macVector) =-            testCase (show i) (macResult macVector @=? toBytes (hmac hashAlg (macKey macVector) (macSecret macVector)))+            testCase (show i) (macResult macVector @=? toBytes (hmacAlg hashAlg (macKey macVector) (macSecret macVector)))  main = defaultMain     [ testGroup "KATs" katTests

cryptohash.cabal view

@@ -1,5 +1,5 @@ Name:                cryptohash-Version:             0.11.0+Version:             0.11.1 Description:     A collection of crypto hashes, with a practical incremental and one-pass, pure APIs,     with performance close to the fastest implementations available in other languages.