Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal On branch : master
http://hackage.haskell.org/trac/ghc/changeset/72405fcb8c063877bed84f8a8c50497ba9d9c187 >--------------------------------------------------------------- commit 72405fcb8c063877bed84f8a8c50497ba9d9c187 Author: Thomas Tuegel <[email protected]> Date: Mon Jul 18 03:31:50 2011 +0000 Fix executable test suite unit test for improved HPC interface. >--------------------------------------------------------------- cabal/tests/PackageTests/TestSuiteExeV10/Check.hs | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/cabal/tests/PackageTests/TestSuiteExeV10/Check.hs b/cabal/tests/PackageTests/TestSuiteExeV10/Check.hs index 203c36b..3028109 100644 --- a/cabal/tests/PackageTests/TestSuiteExeV10/Check.hs +++ b/cabal/tests/PackageTests/TestSuiteExeV10/Check.hs @@ -36,9 +36,9 @@ checkTestWithHpc cabalVersion = TestCase $ do let testMessage = "\'setup test\' should succeed" assertEqual testMessage True $ successful testResult let dummy = emptyTestSuite { testName = "test-Foo" } - tixFile = tixFilePath (dir </> "dist") dummy + tixFile = tixFilePath (dir </> "dist") $ testName dummy tixFileMessage = ".tix file should exist" - markupDir = tixDir (dir </> "dist") dummy + markupDir = htmlDir (dir </> "dist") $ testName dummy markupFile = markupDir </> "hpc_index" <.> "html" markupFileMessage = "HPC markup file should exist" tixFileExists <- doesFileExist tixFile _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
