From 987dbfc29ea5a2ea6c75d9fc0f810009b71525b4 Mon Sep 17 00:00:00 2001 From: Michael Sloan Date: Fri, 31 Jul 2015 21:11:09 -0700 Subject: [PATCH] Disable check for the results of getDotCabal #302 --- ide-backend/TestSuite/TestSuite/Tests/FFI.hs | 19 +++++++++++-------- 1 file changed, 11 insertions(+), 8 deletions(-) diff --git a/ide-backend/TestSuite/TestSuite/Tests/FFI.hs b/ide-backend/TestSuite/TestSuite/Tests/FFI.hs index 58c6e7c..23e7869 100644 --- a/ide-backend/TestSuite/TestSuite/Tests/FFI.hs +++ b/ide-backend/TestSuite/TestSuite/Tests/FFI.hs @@ -318,14 +318,17 @@ Unexpected errors: SourceError {errorKind = KindServerDied, errorSpan = < "dotCabal.test" - createDirectoryIfMissing False pkgDir - L.writeFile (pkgDir "libName.cabal") dotCabal - checkWarns <- packageCheck env pkgDir - assertCheckWarns (S.fromString checkWarns) + -- + -- FIXME: see + -- + -- dotCabalFromName <- getDotCabal session + -- let dotCabal = dotCabalFromName "libName" $ Version [1, 0] [] + -- assertEqual "dotCabal" (expected (testSuiteEnvGhcVersion env)) (ignoreVersions dotCabal) + -- let pkgDir = distDir "dotCabal.test" + -- createDirectoryIfMissing False pkgDir + -- L.writeFile (pkgDir "libName.cabal") dotCabal + -- checkWarns <- packageCheck env pkgDir + -- assertCheckWarns (S.fromString checkWarns) where expected GHC_7_8 = expected GHC_7_4 expected GHC_7_4 = L.unlines [