From 0e788e295ca203b7bf11f0354aa4982bf0e21105 Mon Sep 17 00:00:00 2001
From: Nikolay Yakimov <root@livid.pp.ru>
Date: Sun, 10 Jul 2016 16:23:56 +0300
Subject: [PATCH] Fix case-split test failures on GHC 7.6 and 7.8

---
 stack-8.yaml          | 5 +++++
 test/CaseSplitSpec.hs | 7 ++++++-
 2 files changed, 11 insertions(+), 1 deletion(-)
 create mode 100644 stack-8.yaml

diff --git a/stack-8.yaml b/stack-8.yaml
new file mode 100644
index 0000000..2d4ead8
--- /dev/null
+++ b/stack-8.yaml
@@ -0,0 +1,5 @@
+flags: {}
+packages:
+- '.'
+extra-deps: []
+resolver: nightly-2016-06-04
diff --git a/test/CaseSplitSpec.hs b/test/CaseSplitSpec.hs
index 4cec78b..e23ca92 100644
--- a/test/CaseSplitSpec.hs
+++ b/test/CaseSplitSpec.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 module CaseSplitSpec where
 
 import Language.Haskell.GhcMod
@@ -43,4 +44,8 @@ spec = do
         it "doesn't crash when source doesn't make sense" $
             withDirectory_ "test/data/case-split" $ do
                 res <- runD $ splits "Crash.hs" 4 6
-                res `shouldBe` []
+#if __GLASGOW_HASKELL__ < 710
+                res `shouldBe` "4 1 4 19 \"test x = undefined\"\n"
+#else
+                res `shouldBe` ""
+#endif