secp256k1

commit 620d3ca76dec94932602b460fcf695f67ef6c508
parent f8f3f3f61d6b5f5b5fa4a69617c3b5c18f4495b6
Author: Jared Tobin <jared@jtobin.io>
Date:   Sat,  5 Oct 2024 16:49:49 +0400

lib: remove zombie comments

Diffstat:
M
lib/Crypto/Curve/Secp256k1.hs
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lib/Crypto/Curve/Secp256k1.hs b/lib/Crypto/Curve/Secp256k1.hs
@@ -439,7 +439,7 @@ unroll i = case i of
 bits2int :: BS.ByteString -> Integer
 bits2int bs =
   let (fi -> blen) = BS.length bs * 8
-      (fi -> qlen) = _CURVE_Q_BITS -- RFC6979 notation
+      (fi -> qlen) = _CURVE_Q_BITS
       del = blen - qlen
   in  if   del > 0
       then roll bs `I.integerShiftR` del
@@ -460,7 +460,7 @@ bits2octets bs =
   in  int2octets z2
 
 -- ecdsa ----------------------------------------------------------------------
--- see https://www.rfc-editor.org/rfc/rfc6979 for deterministic ECDSA spec
+-- see https://www.rfc-editor.org/rfc/rfc6979
 
 data ECDSA = ECDSA {
     ecdsa_r :: !Integer