Update to Stack 15.x

src/Language/GraphQL/AST/Encoder.hs

@@ -15,7 +15,6 @@ module Language.GraphQL.AST.Encoder
 
 import Data.Char (ord)
 import Data.Foldable (fold)
-import Data.Monoid ((<>))
 import qualified Data.List.NonEmpty as NonEmpty
 import Data.Text (Text)
 import qualified Data.Text as Text

src/Language/GraphQL/Error.hs

@@ -20,7 +20,9 @@ import Control.Monad.Trans.State ( StateT
                                  , modify
                                  , runStateT
                                  )
-import Text.Megaparsec ( ParseErrorBundle(..)
+import Text.Megaparsec
+    ( ParseErrorBundle(..)
+    , PosState(..)
     , SourcePos(..)
     , errorOffset
     , parseErrorTextPretty
@@ -39,7 +41,8 @@ parseError ParseErrorBundle{..}  =
         , ("column", Aeson.toJSON $ unPos sourceColumn)
         ]
     go (result, state) x =
-        let (sourcePosition, _, newState) = reachOffset (errorOffset x) state
+        let (_, newState) = reachOffset (errorOffset x) state
+            sourcePosition = pstateSourcePos newState
          in (errorObject x sourcePosition : result, newState)
 
 -- | A wrapper to pass error messages around.

stack.yaml

@@ -1,4 +1,4 @@
-resolver: lts-14.25
+resolver: lts-15.0
 
 packages:
 - .

tests/Test/StarWars/Data.hs

@@ -16,7 +16,6 @@ module Test.StarWars.Data
     , typeName
     ) where
 
-import Data.Monoid (mempty)
 import Data.Functor.Identity (Identity)
 import Control.Applicative (Alternative(..), liftA2)
 import Control.Monad.Trans.Except (throwE)