slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

add missing dbgN helpers

Browse Source
This commit is contained in:
Simon Michael 2014-07-28 18:57:54 -07:00
parent 6c60119a92
commit 3ce34b145c
1 changed files with 21 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
hledger-lib/Hledger/Utils.hs
View File

@ -407,6 +407,27 @@ dbg1 = dbgAt 1
dbg2 :: Show a => String -> a -> a dbg2 :: Show a => String -> a -> a
dbg2 = dbgAt 2 dbg2 = dbgAt 2
dbg3 :: Show a => String -> a -> a
dbg3 = dbgAt 3
dbg4 :: Show a => String -> a -> a
dbg4 = dbgAt 4
dbg5 :: Show a => String -> a -> a
dbg5 = dbgAt 5
dbg6 :: Show a => String -> a -> a
dbg6 = dbgAt 6
dbg7 :: Show a => String -> a -> a
dbg7 = dbgAt 7
dbg8 :: Show a => String -> a -> a
dbg8 = dbgAt 8
dbg9 :: Show a => String -> a -> a
dbg9 = dbgAt 9
-- | Print a message and a showable value to the console if the global -- | Print a message and a showable value to the console if the global
-- debug level is at or above the specified level. Uses unsafePerformIO. -- debug level is at or above the specified level. Uses unsafePerformIO.
dbgAt :: Show a => Int -> String -> a -> a dbgAt :: Show a => Int -> String -> a -> a