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 +1/−1
- src/HaskellWorks/Data/RankSelect/CsPoppy.hs +5/−0
- src/HaskellWorks/Data/RankSelect/CsPoppy2.hs +5/−0
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