hw-packed-vector 0.1.0.0 → 0.2.0.0
raw patch · 3 files changed
+5/−4 lines, 3 filesdep ~optparse-applicativePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: optparse-applicative
API changes (from Hackage documentation)
- HaskellWorks.Data.PackedVector.PackedVector64: createFileIndex :: FilePath -> Count -> Count -> [Word64] -> IO ()
+ HaskellWorks.Data.PackedVector.PackedVector64: createFileIndex :: Handle -> Count -> Count -> [Word64] -> IO ()
Files
- app/App/Commands/CreateIndex.hs +2/−1
- hw-packed-vector.cabal +1/−1
- src/HaskellWorks/Data/PackedVector/PackedVector64.hs +2/−2
app/App/Commands/CreateIndex.hs view
@@ -48,7 +48,8 @@ let ws = fmap fromIntegral (decodeWord32s lbs) :: [Word64] - PV.createFileIndex (opts ^. the @"output") wordSize (fromIntegral inSize) ws+ IO.withBinaryFile (opts ^. the @"output") IO.WriteMode $ \hOut ->+ PV.createFileIndex hOut wordSize (fromIntegral inSize) ws optsCreateIndex :: Parser Z.CreateIndexOptions optsCreateIndex = Z.CreateIndexOptions
hw-packed-vector.cabal view
@@ -1,7 +1,7 @@ cabal-version: 2.2 name: hw-packed-vector-version: 0.1.0.0+version: 0.2.0.0 synopsis: Packed Vector description: Packed Vector. Please see README.md category: Data, Vector
src/HaskellWorks/Data/PackedVector/PackedVector64.hs view
@@ -100,8 +100,8 @@ then B.word64LE newAcc <> go excessBits (w .>. (wordSize - excessBits)) ws else let freeBits = 64 - totalBits in go totalBits (newAcc .<. freeBits .>. freeBits) ws -createFileIndex :: FilePath -> Count -> Count -> [Word64] -> IO ()-createFileIndex filename wordSize inSize ws = IO.withBinaryFile filename IO.WriteMode $ \hOut -> do+createFileIndex :: IO.Handle -> Count -> Count -> [Word64] -> IO ()+createFileIndex hOut wordSize inSize ws = do headerPos <- IO.hTell hOut B.hPutBuilder hOut $ mempty