secp256k1

Pure Haskell Schnorr, ECDSA on the elliptic curve secp256k1 (docs.ppad.tech/secp256k1).
git clone git://git.ppad.tech/secp256k1.git
Log | Files | Refs | README | LICENSE

commit 9bd7a0815f733f120bd1fa3ef40d067f713e2944
parent 3b77517e83c4f64ebb319f8be6f1e5e89db738c4
Author: Jared Tobin <jared@jtobin.io>
Date:   Sun, 28 Dec 2025 08:25:45 -0330

lib: tweak for upcoming fixed change

Diffstat:
Mlib/Crypto/Curve/Secp256k1.hs | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Crypto/Curve/Secp256k1.hs b/lib/Crypto/Curve/Secp256k1.hs @@ -607,7 +607,7 @@ mul_wnaf# ctxArray ctxW ls !abs_b = CT.select_word# b0 (Exts.minusWord# mnum b0) bor !is_zero = CT.from_word_eq# b0 0## - !c0 = CT.from_word# (Exts.and# w 1##) + !c0 = CT.from_bit# (Exts.and# w 1##) !off_nz = Exts.minusWord# (Exts.plusWord# off0 abs_b) 1## !off = CT.select_word# off0 off_nz (CT.not is_zero)