packages feed

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 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