summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2021-07-07 17:20:15 +0100
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-07-27 12:01:51 -0400
commit45f0555455f7384727d959954dc359d491f32ebf (patch)
tree5e56d98ff4ed3449583d6d1bfa7694458a23596e
parent22a16b0fc0b1d6a257027cfc1881e94ae188a1cd (diff)
downloadhaskell-45f0555455f7384727d959954dc359d491f32ebf.tar.gz
hadrian: Add exe suffix to executables in testsuite
-rw-r--r--hadrian/src/Settings/Builders/RunTest.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/hadrian/src/Settings/Builders/RunTest.hs b/hadrian/src/Settings/Builders/RunTest.hs
index 806c31473b..3c918a28f7 100644
--- a/hadrian/src/Settings/Builders/RunTest.hs
+++ b/hadrian/src/Settings/Builders/RunTest.hs
@@ -192,12 +192,12 @@ getTestArgs = do
Just verbosity -> Just $ "--verbose=" ++ verbosity
wayArgs = map ("--way=" ++) (testWays args)
compilerArg = ["--config", "compiler=" ++ show (compiler)]
- ghcPkgArg = ["--config", "ghc_pkg=" ++ show (bindir -/- "ghc-pkg")]
+ ghcPkgArg = ["--config", "ghc_pkg=" ++ show (bindir -/- "ghc-pkg" <.> exe)]
haddockArg = if haveDocs
- then [ "--config", "haddock=" ++ show (bindir -/- "haddock") ]
+ then [ "--config", "haddock=" ++ show (bindir -/- "haddock" <.> exe) ]
else [ "--config", "haddock=" ]
- hp2psArg = ["--config", "hp2ps=" ++ show (bindir -/- "hp2ps")]
- hpcArg = ["--config", "hpc=" ++ show (bindir -/- "hpc")]
+ hp2psArg = ["--config", "hp2ps=" ++ show (bindir -/- "hp2ps" <.> exe)]
+ hpcArg = ["--config", "hpc=" ++ show (bindir -/- "hpc" <.> exe)]
inTreeArg = [ "-e", "config.in_tree_compiler=" ++
show (testCompiler args `elem` ["stage1", "stage2", "stage3"]) ]