Skip to content

greydot/log-effect-syslog

Folders and files

NameName
Last commit message
Last commit date

Latest commit

 

History

9 Commits
 
 
 
 
 
 
 
 
 
 
 
 

Repository files navigation

log-effect-syslog

This package contains a set of utility functions that provide ability to log to syslog using extensible-effects and log-effect.

Example

import Control.Eff
import Control.Eff.Lift
import Control.Eff.Log
import Control.Eff.Log.Syslog

someComp :: ( [LogM IO SyslogMsg] <:: r
            , Lifted IO r
            ) => Eff r ()
someComp = do logInfo "Doing something"
              logDebug "Doing something else"
              {- ... -}
              logInfo "Ok, we're done"

main :: IO ()
main = runLift $ runSyslog "MyProgram" [LogPID] User
               $ someComp

About

Syslog functions and types for log-effect

Resources

License

Stars

Watchers

Forks

Packages

No packages published