summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2020-06-11 22:51:38 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-06-14 15:35:59 -0400
commit8bab9ff1e09c1566a4105146bd636634a24928b9 (patch)
tree8c126bab6e4f47f80eede3a8c54dbf7040e1e2e0
parente4137c486a3df66b49395beea7efc6e200cc9bac (diff)
downloadhaskell-8bab9ff1e09c1566a4105146bd636634a24928b9.tar.gz
hadrian: Fix rts include and library paths
Fixes two bugs: * (?) and (<>) associated in a surprising way * We neglected to include libdw paths in the rts configure flags
-rw-r--r--hadrian/src/Settings/Packages.hs9
1 files changed, 6 insertions, 3 deletions
diff --git a/hadrian/src/Settings/Packages.hs b/hadrian/src/Settings/Packages.hs
index 2af29eaaff..8a7aef5914 100644
--- a/hadrian/src/Settings/Packages.hs
+++ b/hadrian/src/Settings/Packages.hs
@@ -386,9 +386,12 @@ rtsPackageArgs = package rts ? do
, any (wayUnit Dynamic) rtsWays ? arg "dynamic"
, Debug `wayUnit` way ? arg "find-ptr"
]
- , builder (Cabal Setup) ?
- if not (null libnumaLibraryDir) then arg ("--extra-lib-dirs="++libnumaLibraryDir) else mempty
- <> if not (null libnumaIncludeDir) then arg ("--extra-include-dirs="++libnumaIncludeDir) else mempty
+ , builder (Cabal Setup) ? mconcat
+ [ if not (null libdwLibraryDir) then arg ("--extra-lib-dirs="++libdwLibraryDir) else mempty
+ , if not (null libdwIncludeDir) then arg ("--extra-include-dirs="++libdwIncludeDir) else mempty
+ , if not (null libnumaLibraryDir) then arg ("--extra-lib-dirs="++libnumaLibraryDir) else mempty
+ , if not (null libnumaIncludeDir) then arg ("--extra-include-dirs="++libnumaIncludeDir) else mempty
+ ]
, builder (Cc FindCDependencies) ? cArgs
, builder (Ghc CompileCWithGhc) ? map ("-optc" ++) <$> cArgs
, builder Ghc ? ghcArgs