packages feed

bech32 1.1.6 → 1.1.7

raw patch · 3 files changed

+47/−10 lines, 3 filesdep ~basePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: base

API changes (from Hackage documentation)

Files

ChangeLog.md view
@@ -2,6 +2,10 @@  <!-- This ChangeLog follows a format specified by: https://keepachangelog.com/en/1.0.0/ --> +## [1.1.7] - 2024-05-20++- Added support for GHC 9.10 series.+ ## [1.1.6] - 2024-04-24  ### Changed
bech32.cabal view
@@ -1,6 +1,6 @@ cabal-version: 3.0 name:          bech32-version:       1.1.6+version:       1.1.7 synopsis:      Implementation of the Bech32 cryptocurrency address format (BIP 0173). description:   Implementation of the Bech32 cryptocurrency address format documented in the                BIP (Bitcoin Improvement Proposal) 0173.@@ -34,7 +34,7 @@ common dependency-array     build-depends:array                           >= 0.5.4.0    && < 0.6 common dependency-base-    build-depends:base                            >= 4.14.3.0   && < 4.20+    build-depends:base                            >= 4.14.3.0   && < 4.21 common dependency-base58-bytestring     build-depends:base58-bytestring               >= 0.1.0      && < 0.2 common dependency-bytestring
src/Codec/Binary/Bech32/Internal.hs view
@@ -72,40 +72,73 @@      ) where -import Prelude-+import Control.Applicative+    ( Applicative (pure) ) import Control.Exception     ( Exception ) import Control.Monad-    ( guard, join )+    ( guard, join, mapM, return, (=<<) ) import Data.Array     ( Array ) import Data.Bifunctor     ( first ) import Data.Bits     ( Bits, testBit, unsafeShiftL, unsafeShiftR, xor, (.&.), (.|.) )+import Data.Bool+    ( Bool, not, otherwise, (&&), (||) ) import Data.ByteString     ( ByteString ) import Data.Char-    ( chr, ord, toLower, toUpper )+    ( Char, chr, ord, toLower, toUpper )+import Data.Either+    ( Either (Left, Right) ) import Data.Either.Extra     ( maybeToEither )+import Data.Eq+    ( Eq ((/=), (==)) ) import Data.Foldable-    ( foldl' )+    ( Foldable (length, null), foldl' )+import Data.Function+    ( ($), (.) )+import Data.Functor+    ( Functor (fmap), (<$>) ) import Data.Functor.Identity     ( Identity, runIdentity )+import Data.Int+    ( Int ) import Data.Ix     ( Ix (..) ) import Data.List-    ( sort )+    ( concat, filter, map, reverse, sort, take, zip, (++) ) import Data.Map.Strict     ( Map ) import Data.Maybe-    ( isNothing, mapMaybe )+    ( Maybe (Just, Nothing), isNothing, mapMaybe )+import Data.Monoid+    ( Monoid )+import Data.Ord+    ( Ord (..) )+import Data.Semigroup+    ( Semigroup ((<>)) )+import Data.String+    ( String ) import Data.Text     ( Text )+import Data.Traversable+    ( Traversable (traverse) )+import Data.Tuple+    ( fst, snd ) import Data.Word-    ( Word8 )+    ( Word, Word8 )+import Prelude+    ( Bounded (maxBound, minBound)+    , Enum (fromEnum, toEnum)+    , Integral (mod, rem)+    , Num (..)+    , fromIntegral+    )+import Text.Show+    ( Show )  import qualified Data.Array as Arr import qualified Data.ByteString as BS