aead

commit d11fcbb7503edadfa2cb07c0320da1d6b0feee82
parent 7918ee473057e5b8e1617a0d238d39c72ffb6a97
Author: Jared Tobin <jared@jtobin.io>
Date:   Sun,  6 Sep 2026 18:47:11 +0400

lib: fill missing case

Diffstat:
M
lib/Crypto/AEAD/ChaCha20Poly1305.hs
 | 
1
+

1 file changed, 1 insertion(+), 0 deletions(-)
diff --git a/lib/Crypto/AEAD/ChaCha20Poly1305.hs b/lib/Crypto/AEAD/ChaCha20Poly1305.hs
@@ -87,6 +87,7 @@ _poly1305_key_gen
 _poly1305_key_gen key nonce = case ChaCha20.block key 0 nonce of
   Left ChaCha20.InvalidKey -> Left InvalidKey
   Left ChaCha20.InvalidNonce -> Left InvalidNonce
+  Left ChaCha20.CounterOverflow -> Left CounterOverflow
   Right k -> pure (BS.take 32 k)
 {-# INLINEABLE _poly1305_key_gen #-}