diff --git a/hw-rankselect.cabal b/hw-rankselect.cabal
--- a/hw-rankselect.cabal
+++ b/hw-rankselect.cabal
@@ -1,5 +1,5 @@
 name:                   hw-rankselect
-version:                0.9.0.0
+version:                0.10.0.0
 synopsis:               Rank-select
 description:            Please see README.md
 homepage:               http://github.com/haskell-works/hw-rankselect#readme
@@ -22,8 +22,8 @@
   build-depends:        base                          >= 4          && < 5
                       , deepseq
                       , hw-balancedparens             >= 0.1.0.0
-                      , hw-bits                       >= 0.3.0.0
-                      , hw-prim                       >= 0.4.0.0
+                      , hw-bits                       >= 0.6.0.0
+                      , hw-prim                       >= 0.4.0.3
                       , hw-rankselect-base            >= 0.2.0.0
                       , vector
 
diff --git a/src/HaskellWorks/Data/RankSelect/Poppy512S.hs b/src/HaskellWorks/Data/RankSelect/Poppy512S.hs
--- a/src/HaskellWorks/Data/RankSelect/Poppy512S.hs
+++ b/src/HaskellWorks/Data/RankSelect/Poppy512S.hs
@@ -52,7 +52,7 @@
   popCount1 = popCount1 . poppy512SBits
   {-# INLINE popCount1 #-}
 
-popCount1Range :: (DVS.Storable a, PopCount1 a) => Int -> Int -> DVS.Vector a -> Count
+popCount1Range :: Int -> Int -> DVS.Vector Count -> Count
 popCount1Range start len = popCount1 . DVS.take len . DVS.drop start
 
 makePoppy512S :: DVS.Vector Word64 -> Poppy512S