Skip to content

Commit

Permalink
Fix for string literal parsing.
Browse files Browse the repository at this point in the history
Use of "some" keyword meant string could not be empty, changed to "many"
keyword.
Closes #50.
  • Loading branch information
Matthewar committed Jul 10, 2018
1 parent 173d527 commit dbc6cc6
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/Parser/Combinators/Lex.hs
Original file line number Diff line number Diff line change
Expand Up @@ -225,7 +225,7 @@ stringLiteral =
where stringLiteral' :: Char -> Parser String
stringLiteral' container =
char container
*> some (try $ validGraphicChars container)
*> many (try $ validGraphicChars container)
<* char container
validGraphicChars container =
(string (replicate 2 container) *> return container)
Expand Down

0 comments on commit dbc6cc6

Please sign in to comment.