packages feed

fast-logger 3.2.5 → 3.2.6

raw patch · 4 files changed

+9/−3 lines, 4 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- System.Log.FastLogger: [LogCallback] :: (v -> IO ()) -> IO () -> LogType' v
+ System.Log.FastLogger: [LogCallback] :: forall a. (a -> IO ()) -> IO () -> LogType' a
- System.Log.FastLogger: type TimedFastLogger = (FormattedTime -> LogStr) -> IO ()
+ System.Log.FastLogger: type TimedFastLogger = FormattedTime -> LogStr -> IO ()
- System.Log.FastLogger.Internal: data () => Builder
+ System.Log.FastLogger.Internal: data Builder

Files

ChangeLog.md view
@@ -1,3 +1,7 @@+## 3.2.6++* Labeling the thread of SingleLogger.+ ## 3.2.5  * Giving names to threads.
System/Log/FastLogger/File.hs view
@@ -83,7 +83,7 @@     n = log_backup_number spec     dsts' = reverse . ("" :) . map (('.' :) . show) $ [0 .. n - 1]     dsts = map (path ++) dsts'-    srcs = tail dsts+    srcs = drop 1 dsts     srcdsts = zip srcs dsts     move (src, dst) = do         exist <- doesFileExist src
System/Log/FastLogger/SingleLogger.hs view
@@ -7,6 +7,7 @@  import Control.Concurrent (MVar, forkIO, newEmptyMVar, putMVar, takeMVar) import Control.Concurrent.STM+import GHC.Conc.Sync (labelThread)  import System.Log.FastLogger.FileIO import System.Log.FastLogger.IO@@ -69,7 +70,8 @@     tvar <- newTVarIO 0     ref <- newIORef (mempty, [])     buf <- getBuffer bufsize-    _ <- forkIO $ writer bufsize buf fdref tvar ref+    tid <- forkIO $ writer bufsize buf fdref tvar ref+    labelThread tid "FastLogger single logger's writer"     let wakeup = atomically $ modifyTVar' tvar (+ 1)         flush cont = do             mvar <- newEmptyMVar
fast-logger.cabal view
@@ -1,6 +1,6 @@ cabal-version:      >=1.10 name:               fast-logger-version:            3.2.5+version:            3.2.6 license:            BSD3 license-file:       LICENSE maintainer:         Kazu Yamamoto <kazu@iij.ad.jp>