remove redundant condition test on `hashLen /= B.length mHash`

2017-05-18 21:00:14 -07:00 · 2017-05-18 21:00:14 -07:00 · a8902fe119
commit a8902fe119
parent 4270f00277
1 changed files with 0 additions and 1 deletions
--- a/Crypto/PubKey/RSA/PSS.hs
+++ b/Crypto/PubKey/RSA/PSS.hs
@ -70,7 +70,6 @@ signDigestWithSalt :: HashAlgorithm hash
                   -> Either Error ByteString
 signDigestWithSalt salt blinder params pk digest
    | k < hashLen + saltLen + 2 = Left InvalidParameters
-    | hashLen /= B.length mHash = Left InvalidParameters
    | otherwise                 = Right $ dp blinder pk em
    where k        = private_size pk
          mHash    = B.convert digest