From 56b63f1c3eda70e6de5da4b6395b98a378b1e4e7 Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Wed, 30 Sep 2020 05:14:52 +0200 Subject: Validate input object field names --- tests/Language/GraphQL/ValidateSpec.hs | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'tests/Language/GraphQL/ValidateSpec.hs') diff --git a/tests/Language/GraphQL/ValidateSpec.hs b/tests/Language/GraphQL/ValidateSpec.hs index fd53145..b4433ca 100644 --- a/tests/Language/GraphQL/ValidateSpec.hs +++ b/tests/Language/GraphQL/ValidateSpec.hs @@ -590,3 +590,19 @@ spec = , locations = [AST.Location 4 54] } in validate queryString `shouldBe` [expected] + + it "rejects undefined input object fields" $ + let queryString = [r| + { + findDog(complex: { favoriteCookieFlavor: "Bacon" }) { + name + } + } + |] + expected = Error + { message = + "Field \"favoriteCookieFlavor\" is not defined \ + \by type \"DogData\"." + , locations = [AST.Location 3 36] + } + in validate queryString `shouldBe` [expected] -- cgit v1.2.3