on master help sign in
Generate documentation
commitd0b28169f68d4b2e65809e71be01dbf6b875700b authorMichael Snoyman <michael@snoyman.com> dateThu 22 Nov 2012, 12:20 (14 years ago) parent4624ae2
2 files changed+18−1
Stackage/Config.hs+12 Stackage/Test.hs+6−1
Stackage/Config.hs+12
@@ -23,6 +23,18 @@ expectedFailures = fromList $ map PackageName
2323 -- Requires a special hspec-meta which is not yet available from
2424 -- Hackage.
2525 , "hspec"
26+
27+ -- Requires markdown-unlit, which we don't want to depend on.
28+ , "hspec-expectations"
29+
30+ -- text and setenv have recursive dependencies in their tests, which
31+ -- cabal can't (yet) handle
32+ , "text"
33+ , "setenv"
34+
35+ -- The version of GLUT included with the HP does not generate
36+ -- documentation correctly.
37+ , "GLUT"
2638 ]
2739
2840-- | List of packages for our stable Hackage. All dependencies will be
Stackage/Test.hs+6−1
@@ -43,7 +43,12 @@ runTestSuite testdir prevPassed pair@(packageName, _) = do
4343 else do
4444 ph4 <- getHandle AppendMode $ \handle -> runProcess "cabal-dev" ["test"] (Just dir) Nothing Nothing (Just handle) (Just handle)
4545 ec4 <- waitForProcess ph4
46− return $ ec4 == ExitSuccess
46+ if (ec4 /= ExitSuccess)
47+ then return False
48+ else do
49+ ph5 <- getHandle AppendMode $ \handle -> runProcess "cabal-dev" ["haddock"] (Just dir) Nothing Nothing (Just handle) (Just handle)
50+ ec5 <- waitForProcess ph5
51+ return $ ec5 == ExitSuccess
4752 let expectedFailure = packageName `Set.member` expectedFailures
4853 if passed
4954 then do