diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/Test/KitchenSinkSpec.hs | 8 | ||||
| -rw-r--r-- | tests/data/kitchen-sink.min.graphql | 8 |
2 files changed, 12 insertions, 4 deletions
diff --git a/tests/Test/KitchenSinkSpec.hs b/tests/Test/KitchenSinkSpec.hs index 99a00f7..f9f9395 100644 --- a/tests/Test/KitchenSinkSpec.hs +++ b/tests/Test/KitchenSinkSpec.hs @@ -20,10 +20,12 @@ import Text.Megaparsec ( errorBundlePretty spec :: Spec spec = describe "Kitchen Sink" $ it "prints the query" $ do - dataFileName <- getDataFileName "tests/data/kitchen-sink.min.graphql" - expected <- Text.IO.readFile dataFileName + dataFileName <- getDataFileName "tests/data/kitchen-sink.graphql" + minFileName <- getDataFileName "tests/data/kitchen-sink.min.graphql" + actual <- Text.IO.readFile dataFileName + expected <- Text.IO.readFile minFileName either (expectationFailure . errorBundlePretty) (flip shouldBe expected . Encoder.document) - $ parse Parser.document dataFileName expected + $ parse Parser.document dataFileName actual diff --git a/tests/data/kitchen-sink.min.graphql b/tests/data/kitchen-sink.min.graphql index 4f8553d..c39e6ba 100644 --- a/tests/data/kitchen-sink.min.graphql +++ b/tests/data/kitchen-sink.min.graphql @@ -1 +1,7 @@ -query queryName($foo:ComplexType,$site:Site=MOBILE){whoever123is:node(id:[123,456]){id,... on User@defer{field2{id,alias:field1(first:10,after:$foo)@include(if:$foo){id,...frag}}}}}mutation likeStory{like(story:123)@defer{story{id}}}fragment frag on Friend{foo(size:$size,bar:$b,obj:{key:"value"})} +query queryName($foo:ComplexType,$site:Site=MOBILE){whoever123is:node(id:[123,456]){id,... on User@defer{field2{id,alias:field1(first:10,after:$foo)@include(if:$foo){id,...frag}}}}} + +mutation likeStory{like(story:123)@defer{story{id}}} + +fragment frag on Friend{foo(size:$size,bar:$b,obj:{key:"value"})} + +{unnamed(truthy:true,falsey:false),query} |