[project @ 1999-11-16 11:11:32 by simonmar]

Pull in _regPrelude if we're profiling.

diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index 71795af..432282d 100644 (file)
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -1090,6 +1090,9 @@ sub setupLinkOpts {
   if (!$NoHaskellMain) {
    unshift (@Ld_flags,'-u', "${uscore}PrelMain_mainIO_closure");
   }
+  if ($PROFing ne '') {
+   unshift (@Ld_flags,'-u', "${uscore}_regPrelude");
+  }
   if ($TargetPlatform =~ /^powerpc-|^rs6000-/) {
     # sometimes we have lots of toc entries...
     #  unshift(@Ld_flags, ('-Xlinker -bbigtoc -Xlinker -bnoquiet'));