on master help sign in
Actually pass the implicit callstack to have the right call site in scope
d23cdeeAlfredo Di Napoli
katip/src/Katip/Core.hs+4
@@ -826,7 +826,11 @@ logT = [| \ a ns sev msg -> logItem a ns (Just $(getLocTH)) sev msg |]
826-- `logT` for maximum compatibility.
826-- `logT` for maximum compatibility.
827--
827--
828-- @logLoc obj mempty InfoS "Hello world"@
828-- @logLoc obj mempty InfoS "Hello world"@
829+#if MIN_VERSION_base(4, 8, 0)
830+logLoc :: (Applicative m, LogItem a, Katip m, ?loc :: CallStack)
831+#else
829logLoc :: (Applicative m, LogItem a, Katip m)
832logLoc :: (Applicative m, LogItem a, Katip m)
833+#endif
830 => a
834 => a
831 -> Namespace
835 -> Namespace
832 -> Severity
836 -> Severity