Pass -x to strip on OSX

gentoo-haskell · Jul 20, 2008 · 7134eac · 7134eac
1 parent 92a7981
commit 7134eac
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/Distribution/Simple/GHC.hs b/Distribution/Simple/GHC.hs
@@ -727,9 +727,13 @@ installExe verbosity lbi pref buildPref (progprefix, progsuffix) pkg_descr
 stripExe :: Verbosity -> LocalBuildInfo -> FilePath -> FilePath -> IO ()
 stripExe verbosity lbi name path = when (stripExes lbi) $
   case lookupProgram stripProgram (withPrograms lbi) of
-    Just strip -> rawSystemProgram verbosity strip [path]
+    Just strip -> rawSystemProgram verbosity strip options
     Nothing    -> warn verbosity $ "Unable to strip executable '" ++ name
                                 ++ "' (missing the 'strip' program)"
+  where
+    options = path : case buildOS of
+       OSX -> ["-x"]
+       _   -> []
 
 -- |Install for ghc, .hi, .a and, if --with-ghci given, .o
 installLib    :: Verbosity -- ^verbosity