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