jimmy/postgrest
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

use in module traceM

Browse Source
This commit is contained in:
Stephen Diehl
2016-04-09 14:49:16 -04:00
parent 8f6e97633c
commit d5bdaf0c88
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Debug.hs
+2 -2
View File
@@ -32,7 +32,7 @@ traceShow a = T.trace (P.show a) a
{-# WARNING traceShowM "'traceShowM' remains in code" #-} {-# WARNING traceShowM "'traceShowM' remains in code" #-}
traceShowM :: (P.Show a, P.Monad m) => a -> m () traceShowM :: (P.Show a, P.Monad m) => a -> m ()
traceShowM a = T.traceM (P.show a) traceShowM a = traceM (P.show a)
{-# WARNING traceM "'traceM' remains in code" #-} {-# WARNING traceM "'traceM' remains in code" #-}
traceM :: (P.Monad m) => P.String -> m () traceM :: (P.Monad m) => P.String -> m ()
@@ -44,4 +44,4 @@ traceIO = T.traceIO
{-# WARNING notImplemented "'notImplemented' remains in code" #-} {-# WARNING notImplemented "'notImplemented' remains in code" #-}
notImplemented :: a notImplemented :: a
notImplemented = P.error "Not implemented" otImplemented = P.error "Not implemented"