Add GHC-7.10 support

test/CabalApiSpec.hs

@@ -9,7 +9,6 @@ import Language.Haskell.GhcMod.Types
 import Test.Hspec
 import System.Directory
 import System.FilePath
-import System.Process (readProcess)
 
 import Dir
 import TestUtils
@@ -47,19 +46,6 @@ spec = do
                 includeDirs res' `shouldBe` ["test/data","test/data/dist/build","test/data/dist/build/autogen","test/data/subdir1/subdir2","test/data/test"]
                 (pkgName `map` depPackages res') `shouldContain` ["Cabal"]
 
-
-    describe "cabalDependPackages" $ do
-        it "extracts dependent packages" $ do
-            crdl <- findCradle' "test/data/"
-            pkgs <- cabalDependPackages . cabalAllBuildInfo <$> runD (parseCabalFile crdl "test/data/cabalapi.cabal")
-            pkgs `shouldBe` ["Cabal","base","template-haskell"]
-        it "uses non default flags" $ do
-            withDirectory_ "test/data/cabal-flags" $ do
-                crdl <- findCradle
-                _ <- readProcess "cabal" ["configure", "-ftest-flag"] ""
-                pkgs <- cabalDependPackages . cabalAllBuildInfo <$> runD (parseCabalFile crdl "cabal-flags.cabal")
-                pkgs `shouldBe` ["Cabal","base"]
-
     describe "cabalSourceDirs" $ do
         it "extracts all hs-source-dirs" $ do
             crdl <- findCradle' "test/data/check-test-subdir"

test/GhcApiSpec.hs

@@ -1,29 +0,0 @@
-module GhcApiSpec where
-
-import Control.Applicative
-import Data.List (sort)
-import Language.Haskell.GhcMod.GHCApi
-import Test.Hspec
-import TestUtils
-
-import Dir
-
-spec :: Spec
-spec = do
-    describe "findModule" $ do
-        it "finds Data.List in `base' and `haskell2010'"
-            $ withDirectory_ "test/data" $ runD $ do
-                pkgs <- findModule "Data.List" <$> ghcPkgDb
-                let pkgNames = pkgName `map` pkgs
-                liftIO $ pkgNames `shouldContain` ["base", "haskell2010"]
-
-    describe "moduleInfo" $ do
-        it "works for modules from global packages (e.g. base:Data.List)"
-            $ withDirectory_ "test/data" $ runD $ do
-                Just info <- moduleInfo (Just ("base","","")) "Data.List"
-                liftIO $ sort (bindings info) `shouldContain` ["++"]
-
-        it "works for local modules"
-            $ withDirectory_ "test/data" $ runD $ do
-                Just info <- moduleInfo Nothing "Baz"
-                liftIO $ bindings info `shouldContain` ["baz"]