diff options
| author | Eugen Wissner <belka@caraus.de> | 2019-12-26 13:00:47 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2019-12-26 13:07:21 +0100 |
| commit | 56d88310df7c92a1721cc0dfa08a1d232c47c14b (patch) | |
| tree | 15604a675752a64e4a3be68e8848c7133e7ad5c8 /src/Language/GraphQL/Execute.hs | |
| parent | e3a495a778e8ccec18e5d5c494ab3b0eed31b13c (diff) | |
| download | graphql-56d88310df7c92a1721cc0dfa08a1d232c47c14b.tar.gz | |
Add definition module
Diffstat (limited to 'src/Language/GraphQL/Execute.hs')
| -rw-r--r-- | src/Language/GraphQL/Execute.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Language/GraphQL/Execute.hs b/src/Language/GraphQL/Execute.hs index 74f33f9..5278606 100644 --- a/src/Language/GraphQL/Execute.hs +++ b/src/Language/GraphQL/Execute.hs @@ -13,7 +13,7 @@ import Data.List.NonEmpty (NonEmpty(..)) import qualified Data.List.NonEmpty as NE import Data.Text (Text) import qualified Data.Text as Text -import qualified Language.GraphQL.AST as AST +import Language.GraphQL.AST.Document import qualified Language.GraphQL.AST.Core as AST.Core import qualified Language.GraphQL.Execute.Transform as Transform import Language.GraphQL.Error @@ -27,7 +27,7 @@ import qualified Language.GraphQL.Schema as Schema execute :: MonadIO m => NonEmpty (Schema.Resolver m) -- ^ Resolvers. -> Schema.Subs -- ^ Variable substitution function. - -> AST.Document -- @GraphQL@ document. + -> Document -- @GraphQL@ document. -> m Aeson.Value execute schema subs doc = maybe transformError (document schema Nothing) $ Transform.document subs doc @@ -44,7 +44,7 @@ executeWithName :: MonadIO m => NonEmpty (Schema.Resolver m) -- ^ Resolvers -> Text -- ^ Operation name. -> Schema.Subs -- ^ Variable substitution function. - -> AST.Document -- ^ @GraphQL@ Document. + -> Document -- ^ @GraphQL@ Document. -> m Aeson.Value executeWithName schema name subs doc = maybe transformError (document schema $ Just name) $ Transform.document subs doc |