From 36c42531355ef273214f61a7fadbf40137c5b2db Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Gr=C3=B6ber?= <dxld@darkboxed.org>
Date: Mon, 10 Aug 2015 08:15:34 +0200
Subject: [PATCH] Desugar warnings don't work before ghc 7.8

---
 test/CheckSpec.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/test/CheckSpec.hs b/test/CheckSpec.hs
index 1893e0c..cc9b219 100644
--- a/test/CheckSpec.hs
+++ b/test/CheckSpec.hs
@@ -53,10 +53,13 @@ spec = do
                     res <- runD $ checkSyntax ["Foo.hs"]
                     res `shouldBe` ""
 
+#if __GLASGOW_HASKELL__ >= 708
+-- See https://github.com/kazu-yamamoto/ghc-mod/issues/507
         it "emits warnings generated in GHC's desugar stage" $ do
             withDirectory_ "test/data/check-missing-warnings" $ do
                 res <- runD $ checkSyntax ["DesugarWarnings.hs"]
                 res `shouldBe` "DesugarWarnings.hs:4:9:Warning: Pattern match(es) are non-exhaustive\NULIn a case alternative: Patterns not matched: _ : _\n"
+#endif
 
         it "works with cabal builtin preprocessors" $ do
             withDirectory_ "test/data/cabal-preprocessors" $ do