From b783f25fa80359f03ecf9907fd98bc4ac1c6fdb1 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sun, 7 Aug 2011 22:29:47 +0000
Subject: [PATCH] type signature

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

diff --git a/hledger-lib/Hledger/Utils.hs b/hledger-lib/Hledger/Utils.hs
index 237faf709..da0e6ec04 100644
--- a/hledger-lib/Hledger/Utils.hs
+++ b/hledger-lib/Hledger/Utils.hs
@@ -332,6 +332,7 @@ mtrace :: (Monad m, Show a) => a -> m a
 mtrace a = strace a `seq` return a
 
 -- | trace an expression using a custom show function
+tracewith :: (a -> String) -> a -> a
 tracewith f e = trace (f e) e
 
 -- parsing