From c1943c1979a0bfd37dae3a87d863f06938176baf Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Thu, 29 Aug 2019 07:40:50 +0200 Subject: Document all public symbols. Mostly basic documentation. Fixes #4. --- src/Language/GraphQL/AST/Transform.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/Language/GraphQL/AST/Transform.hs') 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 -- cgit v1.2.3