cabal-testsuite/PackageTests/InternalLibraries/setup-gen-script.test.hs

   1 import Test.Cabal.Prelude
   2 -- Test to see if --gen-script
   3 main = setupAndCabalTest $ do
   4     is_windows <- isWindows
   5     withPackageDb $ do
   6         withDirectory "p" $ do
   7             setup_build []
   8             setup "copy" []
   9             setup "register" ["--gen-script"]
  10             _ <- if is_windows
  11                     then shell "cmd" ["/C", "register.bat"]
  12                     else shell "sh" ["register.sh"]
  13             return ()
  14         -- Make sure we can see p
  15         withDirectory "r" $ setup_install []