diff --git a/Crypto/Error/Types.hs b/Crypto/Error/Types.hs index 6845c43..fa07cb7 100644 --- a/Crypto/Error/Types.hs +++ b/Crypto/Error/Types.hs @@ -33,6 +33,8 @@ data CryptoError = | CryptoError_SecretKeySizeInvalid | CryptoError_SecretKeyStructureInvalid | CryptoError_PublicKeySizeInvalid + -- Message authentification error + | CryptoError_MacKeyInvalid deriving (Show,Eq,Enum,Data,Typeable) instance E.Exception CryptoError