diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2021-06-23 10:28:07 +0100 |
|---|---|---|
| committer | Zubin <zubin.duggal@gmail.com> | 2021-06-25 09:15:59 +0000 |
| commit | 8b2554efe0ed942c3861c69963ce3ec1e72eb08e (patch) | |
| tree | b4d29a3f84e7964356a51e9531352049d1210437 | |
| parent | f62d4d4dd1cf96104221cf7e74eaea7f60569a29 (diff) | |
| download | haskell-8b2554efe0ed942c3861c69963ce3ec1e72eb08e.tar.gz | |
linker: Replace one missed usage of Opt_RPath with useXLinkerRPath
(cherry picked from commit f926ecfdcdf5468b8539bc8f4aad87404f1e397e)
| -rw-r--r-- | compiler/main/DriverPipeline.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/main/DriverPipeline.hs b/compiler/main/DriverPipeline.hs index a7663819da..1bc08779cc 100644 --- a/compiler/main/DriverPipeline.hs +++ b/compiler/main/DriverPipeline.hs @@ -1747,7 +1747,7 @@ linkBinary' staticLink dflags o_files dep_packages = do | osMachOTarget (platformOS platform) && dynLibLoader dflags == SystemDependent && WayDyn `elem` ways dflags && - gopt Opt_RPath dflags + useXLinkerRPath dflags (platformOS platform) = let libpath = if gopt Opt_RelativeDynlibPaths dflags then "@loader_path" </> (l `makeRelativeTo` full_output_fn) |