commit 2434facc19f6204eb0374bf4ad1213b843e0a516
parent 9c644cad0319f18b55c5e5c51e27fe46e713556c
Author: Jared Tobin <jared@jtobin.io>
Date: Fri, 21 Nov 2025 15:29:57 +0400
lib: remove superfluous pure
Diffstat:
1 file changed, 0 insertions(+), 1 deletion(-)
diff --git a/lib/Crypto/Curve/Secp256k1.hs b/lib/Crypto/Curve/Secp256k1.hs
@@ -1221,7 +1221,6 @@ _verify_ecdsa_unrestricted _mul (SHA256.hash -> h) p (ECDSA r s) = M.isJust $ do
guard (capR /= _CURVE_ZERO)
let Affine (modQ -> v) _ = affine capR
guard (v == r)
- pure ()
{-# INLINE _verify_ecdsa_unrestricted #-}
-- ecdh -----------------------------------------------------------------------