From 4179a83c1d1f743dbb8e01e35a1f5c0445ddc224 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Fri, 20 May 2016 08:31:39 -0700
Subject: [PATCH] lib: pprint

---
 hledger-lib/Hledger/Utils/Debug.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/hledger-lib/Hledger/Utils/Debug.hs b/hledger-lib/Hledger/Utils/Debug.hs
index 357fe02fa..03f3990ae 100644
--- a/hledger-lib/Hledger/Utils/Debug.hs
+++ b/hledger-lib/Hledger/Utils/Debug.hs
@@ -35,6 +35,9 @@ ppShow :: Show a => a -> String
 ppShow = show
 #endif
 
+pprint :: Show a => a -> IO ()
+pprint = putStrLn . ppShow
+
 
 -- | Trace (print on stdout at runtime) a showable value.
 -- (for easily tracing in the middle of a complex expression)