diff options
| author | Eugen Wissner <belka@caraus.de> | 2020-01-05 07:42:04 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2020-01-13 08:21:02 +0100 |
| commit | 8efb08fda157770afb836537b27c2cd55042b706 (patch) | |
| tree | a4207ea264e5268c8c840ffb471b56d7d9687ec5 /src/Language/GraphQL/AST/Lexer.hs | |
| parent | d9a2937b55b3f9c55ac42b1968b62888d916dace (diff) | |
| download | graphql-8efb08fda157770afb836537b27c2cd55042b706.tar.gz | |
Parse ObjectDefinition
Diffstat (limited to 'src/Language/GraphQL/AST/Lexer.hs')
| -rw-r--r-- | src/Language/GraphQL/AST/Lexer.hs | 16 |
1 files changed, 3 insertions, 13 deletions
diff --git a/src/Language/GraphQL/AST/Lexer.hs b/src/Language/GraphQL/AST/Lexer.hs index 80370d4..1cb3363 100644 --- a/src/Language/GraphQL/AST/Lexer.hs +++ b/src/Language/GraphQL/AST/Lexer.hs @@ -28,15 +28,8 @@ module Language.GraphQL.AST.Lexer , unicodeBOM ) where -import Control.Applicative ( Alternative(..) - , liftA2 - ) -import Data.Char ( chr - , digitToInt - , isAsciiLower - , isAsciiUpper - , ord - ) +import Control.Applicative (Alternative(..), liftA2) +import Data.Char (chr, digitToInt, isAsciiLower, isAsciiUpper, ord) import Data.Foldable (foldl') import Data.List (dropWhileEnd) import Data.Proxy (Proxy(..)) @@ -56,10 +49,7 @@ import Text.Megaparsec ( Parsec , takeWhile1P , try ) -import Text.Megaparsec.Char ( char - , digitChar - , space1 - ) +import Text.Megaparsec.Char (char, digitChar, space1) import qualified Text.Megaparsec.Char.Lexer as Lexer import qualified Data.Text as T import qualified Data.Text.Lazy as TL |