cabal-testsuite/PackageTests/HaddockProject/haddock-project.test.hs

   1 import Test.Cabal.Prelude
   2 import System.Directory (doesFileExist, removeDirectory)
   3
   4 main = cabalTest . withRepo "repo" . withSourceCopy $ do
   5     skipUnlessGhcVersion ">= 9.4.0"
   6     env <- getTestEnv
   7     let testDir = testCurrentDir env
   8
   9     cabal "haddock-project" ["all"]
  10     let asyncHaddocks = "haddocks" </> "async" </> "async.haddock"
  11     liftIO (doesFileExist (testDir </> asyncHaddocks))
  12       >>= assertBool ("'" ++ asyncHaddocks ++ "'" ++ "should exist")
  13