packages feed

hw-rankselect 0.8.0.1 → 0.8.0.2

raw patch · 3 files changed

+11/−1 lines, 3 filesPVP: minor bump suggested

API additions: PVP suggests at least a minor version bump

API changes (from Hackage documentation)

+ HaskellWorks.Data.RankSelect.CsPoppy: instance HaskellWorks.Data.Bits.BitLength.BitLength HaskellWorks.Data.RankSelect.CsPoppy.CsPoppy
+ HaskellWorks.Data.RankSelect.CsPoppy2: instance HaskellWorks.Data.Bits.BitLength.BitLength HaskellWorks.Data.RankSelect.CsPoppy2.CsPoppy2

Files

hw-rankselect.cabal view
@@ -1,5 +1,5 @@ name:                   hw-rankselect-version:                0.8.0.1+version:                0.8.0.2 synopsis:               Rank-select description:            Please see README.md homepage:               http://github.com/haskell-works/hw-rankselect#readme
src/HaskellWorks/Data/RankSelect/CsPoppy.hs view
@@ -8,6 +8,7 @@ import qualified Data.Vector.Storable                                       as DVS import           Data.Word import           HaskellWorks.Data.AtIndex+import           HaskellWorks.Data.Bits.BitLength import           HaskellWorks.Data.Bits.BitRead import           HaskellWorks.Data.Bits.BitWise import           HaskellWorks.Data.Bits.PopCount.PopCount1@@ -28,6 +29,10 @@ instance AsVector64 CsPoppy where   asVector64 = asVector64 . csPoppyBits   {-# INLINE asVector64 #-}++instance BitLength CsPoppy where+  bitLength = bitLength . csPoppyBits+  {-# INLINE bitLength #-}  popCount1Range :: (DVS.Storable a, PopCount1 a) => Int -> Int -> DVS.Vector a -> Count popCount1Range start len = popCount1 . DVS.take len . DVS.drop start
src/HaskellWorks/Data/RankSelect/CsPoppy2.hs view
@@ -8,6 +8,7 @@ import qualified Data.Vector.Storable                                       as DVS import           Data.Word import           HaskellWorks.Data.AtIndex+import           HaskellWorks.Data.Bits.BitLength import           HaskellWorks.Data.Bits.BitRead import           HaskellWorks.Data.Bits.BitWise import           HaskellWorks.Data.Bits.PopCount.PopCount1@@ -28,6 +29,10 @@ instance AsVector64 CsPoppy2 where   asVector64 = asVector64 . csPoppy2Bits   {-# INLINE asVector64 #-}++instance BitLength CsPoppy2 where+  bitLength = bitLength . csPoppy2Bits+  {-# INLINE bitLength #-}  popCount1Range :: (DVS.Storable a, PopCount1 a) => Int -> Int -> DVS.Vector a -> Count popCount1Range start len = popCount1 . DVS.take len . DVS.drop start