[commit: ghc] master: Remove unused ghciHandleGhcException (6f4a073)
Ian Lynagh
igloo at earth.li
Fri Feb 17 01:04:18 CET 2012
Repository : ssh://darcs.haskell.org//srv/darcs/ghc
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/6f4a073ed837e6db9466e98ea0fd8ddd4368f637
>---------------------------------------------------------------
commit 6f4a073ed837e6db9466e98ea0fd8ddd4368f637
Author: Ian Lynagh <igloo at earth.li>
Date: Thu Feb 16 22:24:28 2012 +0000
Remove unused ghciHandleGhcException
>---------------------------------------------------------------
ghc/GhciMonad.hs | 5 -----
1 files changed, 0 insertions(+), 5 deletions(-)
diff --git a/ghc/GhciMonad.hs b/ghc/GhciMonad.hs
index f1767c3..71d1e76 100644
--- a/ghc/GhciMonad.hs
+++ b/ghc/GhciMonad.hs
@@ -22,7 +22,6 @@ module GhciMonad (
printForUser, printForUserPartWay, prettyLocations,
initInterpBuffering, turnOffBuffering, flushInterpBuffers,
- ghciHandleGhcException,
) where
#include "HsVersions.h"
@@ -31,7 +30,6 @@ import qualified GHC
import GhcMonad hiding (liftIO)
import Outputable hiding (printForUser, printForUserPartWay)
import qualified Outputable
-import Panic hiding (showException)
import Util
import DynFlags
import HscTypes
@@ -171,9 +169,6 @@ instance Monad GHCi where
instance Functor GHCi where
fmap f m = m >>= return . f
-ghciHandleGhcException :: (GhcException -> GHCi a) -> GHCi a -> GHCi a
-ghciHandleGhcException = handleGhcException
-
getGHCiState :: GHCi GHCiState
getGHCiState = GHCi $ \r -> liftIO $ readIORef r
setGHCiState :: GHCiState -> GHCi ()
More information about the Cvs-ghc
mailing list