tailfile-hinotify 1.0.0.0 → 1.0.0.1
raw patch · 2 files changed
+5/−4 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- lib/System/IO/TailFile.hs +4/−3
- tailfile-hinotify.cabal +1/−1
lib/System/IO/TailFile.hs view
@@ -1,4 +1,4 @@-{-| Tail files in Unix. +{-| Tail files in Linux. The functions in this module do not use any particular streaming library. They just accept an initial state and a monadic update function.@@ -6,6 +6,7 @@ {-# language NumDecimals #-}+{-# language BangPatterns #-} module System.IO.TailFile (tailFile) where import Data.Foldable@@ -75,7 +76,7 @@ for_ ms (\size -> if size' < size -- truncation then hSeek h AbsoluteSeek 0 else return ())- a' <- drainBytes h a+ !a' <- drainBytes h a if getAny event then return a' else go (Just size') a' in go Nothing@@ -83,6 +84,6 @@ let go a = do c <- Data.ByteString.hGetSome h defaultChunkSize if Data.ByteString.null c then do return a- else do a' <- callback a c+ else do !a' <- callback a c drainBytes h a' in go
tailfile-hinotify.cabal view
@@ -1,5 +1,5 @@ name: tailfile-hinotify-version: 1.0.0.0+version: 1.0.0.1 synopsis: Tail files in Unix, using hinotify. description: Tail files in Unix, using hinotify. license: MIT