OSS/graphql
1
1
Fork 1
Code Issues 4 Pull Requests Actions Releases 22 Wiki Activity

Validate values

Browse Source
This commit is contained in:
Eugen Wissner
2021-02-03 05:42:10 +01:00
parent ebf4f4d24e
commit a034f2ce4d
4 changed files with 119 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

36
tests/Language/GraphQL/ValidateSpec.hs
View File

@ -809,7 +809,7 @@ spec =
}
in validate queryString `shouldBe` [expected]
it "wrongly typed variable arguments" $
it "rejects wrongly typed variable arguments" $
let queryString = [r|
query catCommandArgQuery($catCommandArg: CatCommand) {
cat {
@ -825,7 +825,7 @@ spec =
}
in validate queryString `shouldBe` [expected]
it "wrongly typed variable arguments" $
it "rejects wrongly typed variable arguments" $
let queryString = [r|
query intCannotGoIntoBoolean($intArg: Int) {
dog {
@ -840,3 +840,35 @@ spec =
, locations = [AST.Location 2 44]
}
in validate queryString `shouldBe` [expected]
it "rejects values of incorrect types" $
let queryString = [r|
{
dog {
isHousetrained(atOtherHomes: 3)
}
}
|]
expected = Error
{ message =
"Value ConstInt 3 cannot be coerced to type \"Boolean\"."
, locations = [AST.Location 4 48]
}
in validate queryString `shouldBe` [expected]
it "checks for (non-)nullable arguments" $
let queryString = [r|
{
dog {
doesKnowCommand(dogCommand: null)
}
}
|]
expected = Error
{ message =
"Field \"doesKnowCommand\" argument \"dogCommand\" of \
\type \"DogCommand\" is required, but it was not \
\provided."
, locations = [AST.Location 4 19]
}
in validate queryString `shouldBe` [expected]