{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE OverloadedStrings #-}

module Lib
    ( someFunc
    ) where

import Control.Monad.Logger

logMe :: MonadLogger m => m ()
logMe = do
  $logInfo "logging with msg"
  $logWarnS "myLocation" "logging with source message"
  $logErrorSH ["log", "with", "show"]
  monadLoggerLog defaultLoc "logSource" LevelDebug ("everything manual" :: String)

main :: IO ()
main = do
  runStderrLoggingT logMe