polysemy-time 0.2.0.2 → 0.2.0.3
raw patch · 2 files changed
+3/−5 lines, 2 filesdep −string-interpolatePVP ok
version bump matches the API change (PVP)
Dependencies removed: string-interpolate
API changes (from Hackage documentation)
Files
- lib/Polysemy/Time/Debug.hs +2/−3
- polysemy-time.cabal +1/−2
lib/Polysemy/Time/Debug.hs view
@@ -4,7 +4,6 @@ -- |Debug printing, Internal module Polysemy.Time.Debug where -import Data.String.Interpolate (i) import qualified Data.Text as Text import GHC.Stack (SrcLoc (..)) import Relude@@ -20,7 +19,7 @@ Text -> IO () debugPrint SrcLoc{ srcLocModule = (toText -> slm), ..} msg =- putStrLn [i|#{moduleName}:#{srcLocStartLine} #{msg}|]+ putStrLn (toString moduleName <> ":" <> show srcLocStartLine <> " " <> toString msg) where moduleName = fromMaybe slm $ listToMaybe $ reverse $ Text.splitOn "." slm@@ -51,7 +50,7 @@ a -> m () dbgsWith prefix a =- debugPrintWithLoc (srcLoc callStack) [i|#{prefix}: #{show @Text a}|]+ debugPrintWithLoc (srcLoc callStack) (prefix <> ": " <> show a) {-# inline dbgsWith #-} dbgs ::
polysemy-time.cabal view
@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack name: polysemy-time-version: 0.2.0.2+version: 0.2.0.3 synopsis: Polysemy Effect for Time description: Please see the readme on Github at <https://github.com/tek/polysemy-time> category: Time@@ -106,7 +106,6 @@ , base ==4.* , polysemy >=1.4 , relude >=0.7- , string-interpolate >=0.2 , template-haskell , text , time