chacha

commit 77d52db9f9b824f3c4b2ffcfb863e097da7debf4
parent efad15250e776b00cf37535c18ffc01c520fc679
Author: Jared Tobin <jared@jtobin.io>
Date:   Thu, 19 Jun 2025 16:25:06 +0400

lib: specify internal error

Diffstat:
M
lib/Crypto/Cipher/ChaCha20.hs
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lib/Crypto/Cipher/ChaCha20.hs b/lib/Crypto/Cipher/ChaCha20.hs
@@ -166,7 +166,7 @@ _parse_key bs =
       !(WSPair k7 t7) = unsafe_parseWsPair t6
   in  if   BS.null t7
       then Key {..}
-      else error "ppad-chacha (_parse_key): bytes remaining"
+      else error "ppad-chacha (_parse_key): internal error, bytes remaining"
 
 data Nonce = Nonce {
     n0 :: {-# UNPACK #-} !Word32
@@ -183,7 +183,7 @@ _parse_nonce bs =
       !(WSPair n2 t2) = unsafe_parseWsPair t1
   in  if   BS.null t2
       then Nonce {..}
-      else error "ppad-chacha (_parse_nonce): bytes remaining"
+      else error "ppad-chacha (_parse_nonce): internal error, bytes remaining"
 
 -- chacha20 block function ----------------------------------------------------