diff options
| author | Eugen Wissner <belka@caraus.de> | 2024-11-05 19:44:45 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2024-11-05 19:44:45 +0100 |
| commit | 97627ffc3615be45e90a3bee231f9570ecc0193d (patch) | |
| tree | a2441f75f208da7b0bff553505a1c3f00532d790 /src/Language/GraphQL/AST/Encoder.hs | |
| parent | 6f7bb10a62163cd50f520687fe6300593530265c (diff) | |
| download | graphql-97627ffc3615be45e90a3bee231f9570ecc0193d.tar.gz | |
Parse interfaces implementing interfaces
Diffstat (limited to 'src/Language/GraphQL/AST/Encoder.hs')
| -rw-r--r-- | src/Language/GraphQL/AST/Encoder.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Language/GraphQL/AST/Encoder.hs b/src/Language/GraphQL/AST/Encoder.hs index a1076e4..603023b 100644 --- a/src/Language/GraphQL/AST/Encoder.hs +++ b/src/Language/GraphQL/AST/Encoder.hs @@ -226,10 +226,11 @@ typeDefinition formatter = \case <> optempty (directives formatter) directives' <> eitherFormat formatter " " "" <> bracesList formatter (fieldDefinition nextFormatter) fields' - Full.InterfaceTypeDefinition description' name' directives' fields' + Full.InterfaceTypeDefinition description' name' ifaces' directives' fields' -> optempty (description formatter) description' <> "interface " <> Lazy.Text.fromStrict name' + <> optempty (" " <>) (implementsInterfaces ifaces') <> optempty (directives formatter) directives' <> eitherFormat formatter " " "" <> bracesList formatter (fieldDefinition nextFormatter) fields' |