packages feed

hit 0.4.2 → 0.4.3

raw patch · 2 files changed

+10/−2 lines, 2 filesdep ~basePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: base

API changes (from Hackage documentation)

Files

Data/Git/Storage/FileWriter.hs view
@@ -20,6 +20,14 @@  defaultCompression = 6 +-- this is a copy of modifyIORef' found in base 4.6 (ghc 7.6),+-- for older version of base.+modifyIORefStrict :: IORef a -> (a -> a) -> IO ()+modifyIORefStrict ref f = do+    x <- readIORef ref+    let x' = f x+    x' `seq` writeIORef ref x'+ data FileWriter = FileWriter         { writerHandle  :: Handle         , writerDeflate :: Deflate@@ -42,7 +50,7 @@ postDeflate handle = maybe (return ()) (B.hPut handle)  fileWriterOutput (FileWriter { writerHandle = handle, writerDigest = digest, writerDeflate = deflate }) bs = do-        modifyIORef' digest (\ctx -> SHA1.update ctx bs)+        modifyIORefStrict digest (\ctx -> SHA1.update ctx bs)         (>>= postDeflate handle) =<< feedDeflate deflate bs  fileWriterClose (FileWriter { writerHandle = handle, writerDeflate = deflate }) =
hit.cabal view
@@ -1,5 +1,5 @@ Name:                hit-Version:             0.4.2+Version:             0.4.3 Synopsis:            Git operations in haskell Description:     .