cabal-testsuite/PackageTests/Check/ConfiguredPackage/Paths/InvalidWin/cabal.test.hs

   1 import Test.Cabal.Prelude
   2
   3 import System.Directory (createDirectoryIfMissing)
   4
   5 -- Invalid Windows filepath.
   6 main = cabalTest $ do
   7   skipIfWindows
   8   cwd <- testCurrentDir <$> getTestEnv
   9   liftIO $ createDirectoryIfMissing False $ cwd </> "n?ul"
  10   liftIO $ writeFile (cwd </> "n?ul" </> "test.a") ""
  11     -- A directory named like `n?ul` on Windows will make external
  12     -- tools like git — and hence the whole testsuite — error.
  13   fails $ cabal "check" []