packages feed

bits-extra 0.0.2.2 → 0.0.2.3

raw patch · 3 files changed

+16/−6 lines, 3 filesdep ~criteriondep ~doctestdep ~ghc-primPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: criterion, doctest, ghc-prim, hedgehog, hspec, vector

API changes (from Hackage documentation)

Files

bits-extra.cabal view
@@ -1,7 +1,7 @@ cabal-version: 2.2  name:                   bits-extra-version:                0.0.2.2+version:                0.0.2.3 synopsis:               Useful bitwise operations description:            Please see the README on Github at <https://github.com/haskell-works/bits-extra#readme> category:               Data, Bit
src/Data/Bits/Pdep/Prim.hs view
@@ -1,4 +1,6 @@-{-# LANGUAGE CPP       #-}+{-# LANGUAGE BangPatterns #-}+{-# LANGUAGE CPP          #-}+{-# LANGUAGE MagicHash    #-}  {-| Module      : Data.Bits.Pdep.Prim@@ -17,10 +19,10 @@   , fastPdepEnabled   ) where +import GHC.Prim import GHC.Word  #if MIN_VERSION_base(4,11,0) && defined(BMI2_ENABLED)-import GHC.Prim #else import Data.Bits.Pdep.Slow #endif@@ -72,7 +74,10 @@   -> Word32 -- ^ bitmap selecting the bits that are to be deposited   -> Word32 -- ^ word containing the deposited bits #if MIN_VERSION_base(4,11,0) && defined(BMI2_ENABLED)-primPdep32 (W32# src#) (W32# mask#) = W32# (pdep32# src# mask#)+primPdep32 src mask =+  let !(W# src#)   = fromIntegral src  in+  let !(W# mask#)  = fromIntegral mask in+  fromIntegral (W# (pdep32# src# mask#)) #else primPdep32 = slowPdep #endif
src/Data/Bits/Pext/Prim.hs view
@@ -1,4 +1,6 @@-{-# LANGUAGE CPP       #-}+{-# LANGUAGE BangPatterns #-}+{-# LANGUAGE CPP          #-}+{-# LANGUAGE MagicHash    #-}  {-| Module      : Data.Bits.Pext.Prim@@ -62,7 +64,10 @@   -> Word32 -- ^ bitmap selecting the bits that are to be extracted   -> Word32 -- ^ word containing the extracted bits #if MIN_VERSION_base(4,11,0) && defined(BMI2_ENABLED)-primPext32 (W32# src#) (W32# mask#) = W32# (pext32# src# mask#)+primPext32 src mask =+  let !(W# src#)   = fromIntegral src  in+  let !(W# mask#)  = fromIntegral mask in+  fromIntegral (W# (pext32# src# mask#)) #else primPext32 = slowPext #endif