From 2a3feb92881d7ba702346135ca89d9ebe4dda5f7 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Mon, 31 Jul 2017 08:09:05 -0700 Subject: [PATCH] bin: check: fix megaparsec-related build error --- bin/hledger-check.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bin/hledger-check.hs b/bin/hledger-check.hs index 0fdd9ad9c..95813143b 100755 --- a/bin/hledger-check.hs +++ b/bin/hledger-check.hs @@ -398,7 +398,7 @@ args = info (helper <*> parser) $ mconcat Right (a, _) -> pure (s, a) Left err -> fail ("failed to parse input '" ++ s ++ "': " ++ show err) - readParsec' :: P.Parser a -> ReadM (String, a) + readParsec' :: H.SimpleTextParser a -> ReadM (String, a) readParsec' p = do s <- str let parsed = runIdentity $ P.runParserT p "" (pack s)