diff options
author | David Terei <davidterei@gmail.com> | 2012-04-13 04:23:09 -0700 |
---|---|---|
committer | David Terei <davidterei@gmail.com> | 2012-04-13 04:23:09 -0700 |
commit | 6ea5981cea53b7739cf64756a5fc0726d88d7172 (patch) | |
tree | 6687e0c8d63706b5c6ca8124e6e9c7230c630d2b | |
parent | b297a1ff63467831d34546181fc58892e72ebfd1 (diff) | |
download | haskell-6ea5981cea53b7739cf64756a5fc0726d88d7172.tar.gz |
Revert "Add GHCi monad"
This reverts commit 7e04ab6158957c90e3c68911b6909b6ef69621da.
-rw-r--r-- | libraries/base/GHC/GHCi.hs | 42 | ||||
-rw-r--r-- | libraries/base/base.cabal | 1 |
2 files changed, 0 insertions, 43 deletions
diff --git a/libraries/base/GHC/GHCi.hs b/libraries/base/GHC/GHCi.hs deleted file mode 100644 index d08aab37d7..0000000000 --- a/libraries/base/GHC/GHCi.hs +++ /dev/null @@ -1,42 +0,0 @@ -{-# LANGUAGE NoImplicitPrelude #-} -{-# OPTIONS_HADDOCK hide #-} - ------------------------------------------------------------------------------ --- | --- Module : GHC.GHCi --- Copyright : (c) The University of Glasgow 2012 --- License : see libraries/base/LICENSE --- --- Maintainer : cvs-ghc@haskell.org --- Stability : internal --- Portability : non-portable (GHC Extensions) --- --- The GHCi Monad lifting interface. --- ------------------------------------------------------------------------------ - --- #hide -module GHC.GHCi ( - GHCiSandboxIO(..), NoIO() - ) where - -import GHC.Base (IO(), Monad, (>>=), return, id, (.)) - --- | A monad that can execute GHCi statements by lifting them out of --- m into the IO monad. (e.g state monads) -class (Monad m) => GHCiSandboxIO m where - ghciStepIO :: m a -> IO a - -instance GHCiSandboxIO IO where - ghciStepIO = id - --- | A monad that doesn't allow any IO. -newtype NoIO a = NoIO { noio :: IO a } - -instance Monad NoIO where - return a = NoIO (return a) - (>>=) k f = NoIO (noio k >>= noio . f) - -instance GHCiSandboxIO NoIO where - ghciStepIO = noio - diff --git a/libraries/base/base.cabal b/libraries/base/base.cabal index 6e97cc0fd6..2cbfa11c03 100644 --- a/libraries/base/base.cabal +++ b/libraries/base/base.cabal @@ -58,7 +58,6 @@ Library { GHC.Float.RealFracMethods, GHC.Foreign, GHC.ForeignPtr, - GHC.GHCi, GHC.Handle, GHC.IO, GHC.IO.Buffer, |