commit 0283696e245b1c70f554d79995e41139561ed4b8 parent 9533b2768394cb5cddf0d08006042c869725d269 Author: Jared Tobin <jared@jtobin.io> Date: Sat, 19 Oct 2024 20:20:12 +0400 meta: update readme example Diffstat:
M | README.md | | | 9 | +++++++-- |
1 file changed, 7 insertions(+), 2 deletions(-)
diff --git a/README.md b/README.md @@ -13,13 +13,18 @@ A sample GHCi session: ``` > :set -XOverloadedStrings + > -- b16 import not actually required for use; just for illustration here + > import qualified Data.ByteString.Base16 as B16 > > -- import qualified > import qualified Crypto.Curve.Secp256k1 as Secp256k1 > > -- secret, public keys - > let sec = Secp256k1.parse_int256 "B7E151628AED2A6ABF7158809CF4F3C762E7160F38B4DA56A784D9045190CFEF" - > let Just pub = Secp256k1.parse_point "DFF1D77F2A671C5F36183726DB2341BE58FEAE1DA2DECED843240F7B502BA659" + > let sec = 0xB7E151628AED2A6ABF7158809CF4F3C762E7160F38B4DA56A784D9045190CFEF + :{ + ghci| let Just pub = Secp256k1.parse_point . B16.decodeLenient $ + ghci| "DFF1D77F2A671C5F36183726DB2341BE58FEAE1DA2DECED843240F7B502BA659" + ghci| :} > > let msg = "i approve of this message" >