Cabal-1.12.0: tests/PackageTests/BuildDeps/TargetSpecificDeps3/Check.hs

module PackageTests.BuildDeps.TargetSpecificDeps3.Check where

import Test.HUnit
import PackageTests.PackageTester
import System.FilePath
import Data.List


suite :: Test
suite = TestCase $ do
    let spec = PackageSpec ("PackageTests" </> "BuildDeps" </> "TargetSpecificDeps3") []
    result <- cabal_build spec
    assertEqual "cabal build should fail - see test-log.txt" False (successful result)
    assertBool "error should be in lemon.hs" $
        "lemon.hs:" `isInfixOf` outputText result
    assertBool "error should be \"Could not find module `System.Time\"" $
        "Could not find module `System.Time'" `isInfixOf` (intercalate " " $ lines $ outputText result)