commit e96127c428ba28568a69e390d63db3d221225ab7
parent a387559048a6820bdcbdda48a6ea3121bb62ad9f
Author: Jared Tobin <jared@jtobin.io>
Date: Sun, 19 Jan 2025 17:56:28 +0400
lib: hlint suggestion
Diffstat:
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 ---------------------------------------------