summaryrefslogtreecommitdiff
path: root/src/Language/GraphQL/Validate/Validation.hs
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2020-08-28 08:32:21 +0200
committerEugen Wissner <belka@caraus.de>2020-08-28 08:32:21 +0200
commit7e78f98f090168fe8b315a5e9438e635afdf93a4 (patch)
treee7d374311710a4fc7372dacff40b244fd5b5b866 /src/Language/GraphQL/Validate/Validation.hs
parenteebad8a27f164088e356e7936afb9a399c70363a (diff)
downloadgraphql-7e78f98f090168fe8b315a5e9438e635afdf93a4.tar.gz
Validate fragment name uniqueness
Diffstat (limited to 'src/Language/GraphQL/Validate/Validation.hs')
-rw-r--r--src/Language/GraphQL/Validate/Validation.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Language/GraphQL/Validate/Validation.hs b/src/Language/GraphQL/Validate/Validation.hs
index 2b5365a..03bbf33 100644
--- a/src/Language/GraphQL/Validate/Validation.hs
+++ b/src/Language/GraphQL/Validate/Validation.hs
@@ -48,6 +48,7 @@ data Validation m = Validation
data Rule m
= DefinitionRule (Definition -> RuleT m)
| OperationDefinitionRule (OperationDefinition -> RuleT m)
+ | FragmentDefinitionRule (FragmentDefinition -> RuleT m)
-- | Monad transformer used by the rules.
type RuleT m = ReaderT (Validation m) Maybe Error