summaryrefslogtreecommitdiff
path: root/src/Language/GraphQL/Validate/Validation.hs
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2020-09-17 10:33:37 +0200
committerEugen Wissner <belka@caraus.de>2020-09-17 10:33:37 +0200
commit497b93c41b2534ec2b92b49e93267178417bef56 (patch)
tree58e05d08b0d5af77028daaa00142b610df83bb25 /src/Language/GraphQL/Validate/Validation.hs
parent6e644c5b4b3a8284ed0a1f0a84fef775f70a68d6 (diff)
downloadgraphql-497b93c41b2534ec2b92b49e93267178417bef56.tar.gz
Validate arguments have unique names
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 0cc39f7..d07d6e8 100644
--- a/src/Language/GraphQL/Validate/Validation.hs
+++ b/src/Language/GraphQL/Validate/Validation.hs
@@ -41,6 +41,7 @@ data Rule m
| FragmentRule (FragmentDefinition -> RuleT m) (InlineFragment -> RuleT m)
| FragmentSpreadRule (FragmentSpread -> RuleT m)
| FieldRule (Field -> RuleT m)
+ | ArgumentsRule (Field -> RuleT m) (Directive -> RuleT m)
-- | Monad transformer used by the rules.
type RuleT m = ReaderT (Validation m) Seq Error