From e02463f452fc3ce82cb93c8c9e916264eb89c337 Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Sun, 4 Aug 2024 09:05:50 +0200 Subject: [PATCH] Remove unused liftA2 import --- src/Language/GraphQL/AST/Lexer.hs | 2 +- src/Language/GraphQL/AST/Parser.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Language/GraphQL/AST/Lexer.hs b/src/Language/GraphQL/AST/Lexer.hs index ab1f36f..2d91b9d 100644 --- a/src/Language/GraphQL/AST/Lexer.hs +++ b/src/Language/GraphQL/AST/Lexer.hs @@ -29,7 +29,7 @@ module Language.GraphQL.AST.Lexer , unicodeBOM ) where -import Control.Applicative (Alternative(..), liftA2) +import Control.Applicative (Alternative(..)) import Data.Char (chr, digitToInt, isAsciiLower, isAsciiUpper, ord) import Data.Foldable (foldl') import Data.List (dropWhileEnd) diff --git a/src/Language/GraphQL/AST/Parser.hs b/src/Language/GraphQL/AST/Parser.hs index e19823c..049876e 100644 --- a/src/Language/GraphQL/AST/Parser.hs +++ b/src/Language/GraphQL/AST/Parser.hs @@ -8,7 +8,7 @@ module Language.GraphQL.AST.Parser ( document ) where -import Control.Applicative (Alternative(..), liftA2, optional) +import Control.Applicative (Alternative(..), optional) import Control.Applicative.Combinators (sepBy1) import qualified Control.Applicative.Combinators.NonEmpty as NonEmpty import Data.List.NonEmpty (NonEmpty(..))