diff options
| author | Eugen Wissner <belka@caraus.de> | 2020-01-28 11:08:28 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2020-01-28 11:08:28 +0100 |
| commit | e8b82122c646ba159146c986cc8983d66f790142 (patch) | |
| tree | 6563ee31014a1ff4f23905f1dc794302d2231872 /tests/Language/GraphQL/AST/ParserSpec.hs | |
| parent | a6bd2370b6ba6f9eba6f0911ce9f8e8042a7f26b (diff) | |
| download | graphql-e8b82122c646ba159146c986cc8983d66f790142.tar.gz | |
Try all extension parsers
Diffstat (limited to 'tests/Language/GraphQL/AST/ParserSpec.hs')
| -rw-r--r-- | tests/Language/GraphQL/AST/ParserSpec.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/Language/GraphQL/AST/ParserSpec.hs b/tests/Language/GraphQL/AST/ParserSpec.hs index f06f6c1..4fae5b1 100644 --- a/tests/Language/GraphQL/AST/ParserSpec.hs +++ b/tests/Language/GraphQL/AST/ParserSpec.hs @@ -135,3 +135,10 @@ spec = describe "Parser" $ do $ OperationTypeDefinition Query "Query" :| [] query = [r|extend schema @newDirective { query: Query }|] in parse document "" query `shouldParse` (testSchemaExtension :| []) + + it "parses an object extension" $ + parse document "" `shouldSucceedOn` [r| + extend type Story { + isHiddenLocally: Boolean + } + |]
\ No newline at end of file |