diff options
Diffstat (limited to 'src/Data/Hmac.hs')
-rw-r--r-- | src/Data/Hmac.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Data/Hmac.hs b/src/Data/Hmac.hs index d1124b6..2211248 100644 --- a/src/Data/Hmac.hs +++ b/src/Data/Hmac.hs @@ -46,9 +46,9 @@ newtype Hmac = Hmac ByteString instance Eq Hmac where (Hmac a) == (Hmac b) = unsafeLocalState $ - ByteString.unsafeUseAsCStringLen a $ \(a', size) -> - ByteString.unsafeUseAsCStringLen b $ \(b', _) -> - constantTimeEquals a' b' size + ByteString.unsafeUseAsCStringLen a $ \(a', size) -> + ByteString.unsafeUseAsCStringLen b $ \(b', _) -> + constantTimeEquals a' b' size instance Show Hmac where show (Hmac m) = show (Digest m) |