From: Ian Lynagh <igloo@earth.li>
Date: Fri, 17 Aug 2007 21:23:20 +0000 (+0000)
Subject: Remove dupliate "io (revertCAFs)" and discardActiveBreakPoints calls
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=036e86560913bfb19b1287985f79a8f279666566;p=ghc-hetmet.git

Remove dupliate "io (revertCAFs)" and discardActiveBreakPoints calls
---

diff --git a/compiler/ghci/InteractiveUI.hs b/compiler/ghci/InteractiveUI.hs
index 179f259..19cc8f1 100644
--- a/compiler/ghci/InteractiveUI.hs
+++ b/compiler/ghci/InteractiveUI.hs
@@ -893,8 +893,6 @@ checkModule m = do
 
 reloadModule :: String -> GHCi ()
 reloadModule m = do
-  io (revertCAFs)		-- always revert CAFs on reload.
-  discardActiveBreakPoints
   session <- getSession
   doLoad session $ if null m then LoadAllTargets 
                              else LoadUpTo (GHC.mkModuleName m)