diff options
| author | Eugen Wissner <belka@caraus.de> | 2019-08-26 10:14:46 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2019-08-26 10:14:46 +0200 |
| commit | 5175586def05410890023ab340b8381045de6811 (patch) | |
| tree | 4c82733c6b65f5f1c9285c3e4e02b2e8c6cfe3f2 /src/Language/GraphQL/Lexer.hs | |
| parent | f54e9451d20d020632fb3481087af2bcbff6033d (diff) | |
| download | graphql-5175586def05410890023ab340b8381045de6811.tar.gz | |
Provide more documentation on functions and types
Diffstat (limited to 'src/Language/GraphQL/Lexer.hs')
| -rw-r--r-- | src/Language/GraphQL/Lexer.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Language/GraphQL/Lexer.hs b/src/Language/GraphQL/Lexer.hs index 8ca03bf..dc000b5 100644 --- a/src/Language/GraphQL/Lexer.hs +++ b/src/Language/GraphQL/Lexer.hs @@ -71,6 +71,8 @@ type Parser = Parsec Void T.Text ignoredCharacters :: Parser () ignoredCharacters = space1 <|> skipSome (char ',') +-- | Parser that skips comments and meaningless characters, whitespaces and +-- commas. spaceConsumer :: Parser () spaceConsumer = Lexer.space ignoredCharacters comment empty |