From a384593bb116c88719f7314b7b1170be3bc181e0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Gr=C3=B6ber?= <dxld@darkboxed.org>
Date: Fri, 12 Sep 2014 06:13:04 +0200
Subject: [PATCH] Only run PatternSynonyms test with ghc>=7.8

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

diff --git a/test/CheckSpec.hs b/test/CheckSpec.hs
index 7c704a4..35e5992 100644
--- a/test/CheckSpec.hs
+++ b/test/CheckSpec.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 module CheckSpec where
 
 import Data.List (isSuffixOf, isInfixOf, isPrefixOf)
@@ -31,10 +32,12 @@ spec = do
                 res <- runID $ checkSyntax ["Baz.hs"]
                 res `shouldSatisfy` ("Baz.hs:5:1:Warning:" `isPrefixOf`)
 
+#if __GLASGOW_HASKELL__ >= 708
         it "works with modules using PatternSynonyms" $ do
             withDirectory_ "test/data/pattern-synonyms" $ do
                 res <- runID $ checkSyntax ["B.hs"]
                 res `shouldSatisfy` ("B.hs:6:9:Warning:" `isPrefixOf`)
+#endif
 
         it "works with foreign exports" $ do
             withDirectory_ "test/data" $ do