From 1c454a05b5eae2b2562f2c813a65a7435cf890d8 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Tue, 16 Nov 1999 11:11:32 +0000
Subject: [PATCH] [project @ 1999-11-16 11:11:32 by simonmar] Pull in
 _regPrelude if we're profiling.

---
 ghc/driver/ghc.lprl |    3 +++
 1 file changed, 3 insertions(+)

diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index 71795af..432282d 100644
--- 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')); 
-- 
1.7.10.4