From 8e3bae4b5c18dd1647e2a1de5c51802531b90ddb Mon Sep 17 00:00:00 2001 From: Danny Navarro Date: Sat, 17 Oct 2015 13:19:00 +0200 Subject: Initial stub for a `GraphQL` and `execute` --- Data/GraphQL/Execute.hs | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 Data/GraphQL/Execute.hs (limited to 'Data/GraphQL/Execute.hs') diff --git a/Data/GraphQL/Execute.hs b/Data/GraphQL/Execute.hs new file mode 100644 index 0000000..9951144 --- /dev/null +++ b/Data/GraphQL/Execute.hs @@ -0,0 +1,14 @@ +{-# LANGUAGE CPP #-} +module Data.GraphQL.Execute where + +#if !MIN_VERSION_base(4,8,0) +import Control.Applicative (Applicative) +#endif + +import qualified Data.Aeson as Aeson (Value) + +import Data.GraphQL.AST +import Data.GraphQL.Schema + +execute :: Applicative f => Schema -> Document -> f Aeson.Value +execute = undefined -- cgit v1.2.3