From ba710a3c968f954d69d3412d91b06debb4fc5a6d Mon Sep 17 00:00:00 2001
From: Eugen Wissner <belka@caraus.de>
Date: Wed, 15 Jan 2020 20:20:50 +0100
Subject: Parse complete TypeSystemDefinition

---
 tests/Language/GraphQL/AST/ParserSpec.hs | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'tests/Language/GraphQL/AST/ParserSpec.hs')

diff --git a/tests/Language/GraphQL/AST/ParserSpec.hs b/tests/Language/GraphQL/AST/ParserSpec.hs
index e561863..2e55389 100644
--- a/tests/Language/GraphQL/AST/ParserSpec.hs
+++ b/tests/Language/GraphQL/AST/ParserSpec.hs
@@ -109,3 +109,10 @@ spec = describe "Parser" $ do
               y: Float
             }
         |]
+
+    it "parses minimal input enum definition with an optional pipe" $
+        parse document "" `shouldSucceedOn` [r|
+            directive @example on
+              | FIELD
+              | FRAGMENT_SPREAD
+        |]
-- 
cgit v1.2.3