From 28781586a5ecf31630730ef0d8dbdbfe6041e7d3 Mon Sep 17 00:00:00 2001
From: Eugen Wissner <belka@caraus.de>
Date: Thu, 9 Jul 2020 08:11:12 +0200
Subject: Parse comments in the front of definitions

---
 tests/Language/GraphQL/AST/ParserSpec.hs | 10 ++++++++++
 1 file changed, 10 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 2801b57..0d3a8de 100644
--- a/tests/Language/GraphQL/AST/ParserSpec.hs
+++ b/tests/Language/GraphQL/AST/ParserSpec.hs
@@ -149,3 +149,13 @@ spec = describe "Parser" $ do
               title
             }
         |]
+
+    it "parses documents beginning with a comment" $
+        parse document "" `shouldSucceedOn` [r|
+            """
+            Query
+            """
+            type Query {
+                queryField: String
+            }
+        |]
-- 
cgit v1.2.3