Safe Haskell	None
Language	Haskell2010

Colog.Polysemy.Formatting.ThreadTimeMessage

Description

Synopsis

data ThreadTimeMessage = ThreadTimeMessage {
- ttmThreadId :: ThreadId
- ttmTime :: UTCTime
- ttmMsg :: Message
}
class HasSeverity msg where
- getSeverity :: msg -> Severity
ttmSeverity :: ThreadTimeMessage -> Severity
addThreadAndTimeToLog :: Members '[Embed IO, Log ThreadTimeMessage] r => Sem (Log Message ': r) a -> Sem r a

Documentation

data ThreadTimeMessage Source #

A log message which wraps a Message, adding a ThreadId and UTCTime timestamp.

Constructors

ThreadTimeMessage
Fields ttmThreadId :: ThreadId ttmTime :: UTCTime ttmMsg :: Message

Instances

Instances details

HasSeverity ThreadTimeMessage Source #
Instance details Defined in Colog.Polysemy.Formatting.ThreadTimeMessage Methods getSeverity :: ThreadTimeMessage -> Severity Source #

class HasSeverity msg where Source #

Methods

getSeverity :: msg -> Severity Source #

Instances

Instances details

HasSeverity ThreadTimeMessage Source #
Instance details Defined in Colog.Polysemy.Formatting.ThreadTimeMessage Methods getSeverity :: ThreadTimeMessage -> Severity Source #
HasSeverity (Msg Severity) Source #
Instance details Defined in Colog.Polysemy.Formatting.ThreadTimeMessage Methods getSeverity :: Msg Severity -> Severity Source #

ttmSeverity :: ThreadTimeMessage -> Severity Source #

Get the severity of the message.

addThreadAndTimeToLog :: Members '[Embed IO, Log ThreadTimeMessage] r => Sem (Log Message ': r) a -> Sem r a Source #

Add the thread id and a timestamp to messages in the log. This should be called before any use of asyncToIO, otherwise all log messages will have the same thread id. It is best called after any use of filterLogs, otherwise you're needlessly processing messages that will never be logged (TODO: test this assertion is true).