Fix failed parsing on multiple required arguments

Fixes #25.
This commit is contained in:
Sam Nolan
2019-11-19 19:41:52 +11:00
committed by Eugen Wissner
parent 7b92e5bcfd
commit 73e21661b4
3 changed files with 12 additions and 6 deletions

View File

@ -89,12 +89,12 @@ symbol :: T.Text -> Parser T.Text
symbol = Lexer.symbol spaceConsumer
-- | Parser for "!".
bang :: Parser Char
bang = char '!'
bang :: Parser T.Text
bang = symbol "!"
-- | Parser for "$".
dollar :: Parser Char
dollar = char '$'
dollar :: Parser T.Text
dollar = symbol "$"
-- | Parser for "@".
at :: Parser Char