From: wolfgang <unknown>
Date: Tue, 2 Jul 2002 10:31:39 +0000 (+0000)
Subject: [project @ 2002-07-02 10:31:39 by wolfgang]
X-Git-Tag: Approx_11550_changesets_converted~1913
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=321cc9a04f68f33ce682fdbd2045d87cbdafcae4;p=ghc-hetmet.git

[project @ 2002-07-02 10:31:39 by wolfgang]
GHCi lib autogeneration for MacOS X
---

diff --git a/ghc/utils/ghc-pkg/Main.hs b/ghc/utils/ghc-pkg/Main.hs
index 80a6c27..538955c 100644
--- a/ghc/utils/ghc-pkg/Main.hs
+++ b/ghc/utils/ghc-pkg/Main.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: Main.hs,v 1.25 2002/06/12 22:04:27 wolfgang Exp $
+-- $Id: Main.hs,v 1.26 2002/07/02 10:31:39 wolfgang Exp $
 --
 -- Package management tool
 -----------------------------------------------------------------------------
@@ -298,8 +298,13 @@ autoBuildGHCiLib dir batch_file ghci_file = do
   let ghci_lib_file  = dir ++ '/':ghci_file
       batch_lib_file = dir ++ '/':batch_file
   hPutStr stderr ("building GHCi library `" ++ ghci_lib_file ++ "'...")
+#ifdef darwin_TARGET_OS
+  system("ld -r -x -o " ++ ghci_lib_file ++ 
+	 " -all_load " ++ batch_lib_file)
+#else
   system("ld -r -x -o " ++ ghci_lib_file ++ 
 	 " --whole-archive " ++ batch_lib_file)
+#endif
   hPutStrLn stderr (" done.")
 
 -----------------------------------------------------------------------------