summaryrefslogtreecommitdiff
path: root/src/Language/GraphQL/AST/Transform.hs
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2019-08-29 07:40:50 +0200
committerEugen Wissner <belka@caraus.de>2019-08-29 07:40:50 +0200
commitc1943c1979a0bfd37dae3a87d863f06938176baf (patch)
tree751ab644dc5e0feaba374a528bb3ab4eebf51105 /src/Language/GraphQL/AST/Transform.hs
parent5175586def05410890023ab340b8381045de6811 (diff)
downloadgraphql-c1943c1979a0bfd37dae3a87d863f06938176baf.tar.gz
Document all public symbols.
Mostly basic documentation. Fixes #4.
Diffstat (limited to 'src/Language/GraphQL/AST/Transform.hs')
-rw-r--r--src/Language/GraphQL/AST/Transform.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Language/GraphQL/AST/Transform.hs b/src/Language/GraphQL/AST/Transform.hs
index 63a2c72..99e0f3e 100644
--- a/src/Language/GraphQL/AST/Transform.hs
+++ b/src/Language/GraphQL/AST/Transform.hs
@@ -18,7 +18,8 @@ import qualified Language.GraphQL.Schema as Schema
-- empty list is returned.
type Fragmenter = Core.Name -> [Core.Field]
--- TODO: Replace Maybe by MonadThrow with CustomError
+-- | Rewrites the original syntax tree into an intermediate representation used
+-- for query execution.
document :: Schema.Subs -> Full.Document -> Maybe Core.Document
document subs doc = operations subs fr ops
where