summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Terei <davidterei@gmail.com>2012-04-13 04:23:09 -0700
committerDavid Terei <davidterei@gmail.com>2012-04-13 04:23:09 -0700
commit6ea5981cea53b7739cf64756a5fc0726d88d7172 (patch)
tree6687e0c8d63706b5c6ca8124e6e9c7230c630d2b
parentb297a1ff63467831d34546181fc58892e72ebfd1 (diff)
downloadhaskell-6ea5981cea53b7739cf64756a5fc0726d88d7172.tar.gz
Revert "Add GHCi monad"
This reverts commit 7e04ab6158957c90e3c68911b6909b6ef69621da.
-rw-r--r--libraries/base/GHC/GHCi.hs42
-rw-r--r--libraries/base/base.cabal1
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,