script

Primitive (Bitcoin) Script support for Haskell.
git clone git://git.ppad.tech/script.git
Log | Files | Refs | LICENSE

commit e96127c428ba28568a69e390d63db3d221225ab7
parent a387559048a6820bdcbdda48a6ea3121bb62ad9f
Author: Jared Tobin <jared@jtobin.io>
Date:   Sun, 19 Jan 2025 17:56:28 +0400

lib: hlint suggestion

Diffstat:
Mlib/Bitcoin/Prim/Script.hs | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Bitcoin/Prim/Script.hs b/lib/Bitcoin/Prim/Script.hs @@ -79,7 +79,7 @@ hilo :: Word8 -> (Word8, Word8) hilo b = let hex_charset = "0123456789abcdef" hi = BU.unsafeIndex hex_charset (fi b `B.shiftR` 4) - lo = BU.unsafeIndex hex_charset (fi b .&. 0b00001111) + lo = BU.unsafeIndex hex_charset (fi b .&. 0b0000_1111) in (hi, lo) -- script and term representation ---------------------------------------------