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

lib: fix a warning

Browse Source
This commit is contained in:
Simon Michael 2016-05-08 20:55:59 -07:00
parent 9304aa1100
commit b583cb327d
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
hledger-lib/Hledger/Read/JournalReader.hs
View File

@ -364,12 +364,12 @@ accountdirectivep = do
pushAccount acct pushAccount acct
return $ ExceptT $ return $ Right id return $ ExceptT $ return $ Right id
-- | Terminate parsing entirely, returning the given error message -- -- | Terminate parsing entirely, returning the given error message
-- with the current parse position prepended. -- -- with the current parse position prepended.
parserError :: String -> ErroringJournalParser a -- parserError :: String -> ErroringJournalParser a
parserError s = do -- parserError s = do
pos <- getPosition -- pos <- getPosition
parserErrorAt pos s -- parserErrorAt pos s
-- | Terminate parsing entirely, returning the given error message -- | Terminate parsing entirely, returning the given error message
-- with the given parse position prepended. -- with the given parse position prepended.