Merge branch 'master' of mac:ghc/git/val32/.

dmpots · Oct 6, 2011 · a7be91a · a7be91a
2 parents 5ac223a + 20705df
commit a7be91a
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/compiler/main/DriverPipeline.hs b/compiler/main/DriverPipeline.hs
@@ -1688,6 +1688,17 @@ linkBinary dflags o_files dep_packages = do
                           then ["-Wl,-no_compact_unwind"]
                           else [])
 
+                      -- '-Wl,-read_only_relocs,suppress'
+                      -- ld gives loads of warnings like:
+                      --     ld: warning: text reloc in _base_GHCziArr_unsafeArray_info to _base_GHCziArr_unsafeArray_closure
+                      -- when linking any program. We're not sure
+                      -- whether this is something we ought to fix, but
+                      -- for now this flags silences them.
+                      ++ (if platformOS   (targetPlatform dflags) == OSDarwin   &&
+                             platformArch (targetPlatform dflags) == ArchX86
+                          then ["-Wl,-read_only_relocs,suppress"]
+                          else [])
+
                       ++ o_files
                       ++ extra_ld_inputs
                       ++ lib_path_opts