From 73e21661b413192c26a539141a44b0c25e8c2aa9 Mon Sep 17 00:00:00 2001 From: Sam Nolan Date: Tue, 19 Nov 2019 19:41:52 +1100 Subject: Fix failed parsing on multiple required arguments Fixes #25. --- src/Language/GraphQL/AST/Lexer.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src/Language/GraphQL/AST/Lexer.hs') diff --git a/src/Language/GraphQL/AST/Lexer.hs b/src/Language/GraphQL/AST/Lexer.hs index 97a334c..f4111a9 100644 --- a/src/Language/GraphQL/AST/Lexer.hs +++ b/src/Language/GraphQL/AST/Lexer.hs @@ -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 -- cgit v1.2.3