From: panne <unknown>
Date: Thu, 3 Oct 2002 13:41:35 +0000 (+0000)
Subject: [project @ 2002-10-03 13:41:35 by panne]
X-Git-Tag: nhc98-1-18-release~825
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=e500eb01d713b4a3080a669951ef23018f44ba3e;p=ghc-base.git

[project @ 2002-10-03 13:41:35 by panne]
Warning police #8: Exporting Foo(..) exports Foo's field selector
functions, too, so let's nuke the latter from the export list.
---

diff --git a/Control/Monad/Cont.hs b/Control/Monad/Cont.hs
index 51cf2da..251dbd9 100644
--- a/Control/Monad/Cont.hs
+++ b/Control/Monad/Cont.hs
@@ -15,11 +15,9 @@
 module Control.Monad.Cont (
 	MonadCont(..),
 	Cont(..),
-	runCont,
 	mapCont,
 	withCont,
 	ContT(..),
-	runContT,
 	mapContT,
 	withContT,
 	module Control.Monad,
diff --git a/Control/Monad/Error.hs b/Control/Monad/Error.hs
index 91694ba..19445bf 100644
--- a/Control/Monad/Error.hs
+++ b/Control/Monad/Error.hs
@@ -20,7 +20,6 @@ module Control.Monad.Error (
 	Error(..),
 	MonadError(..),
 	ErrorT(..),
-	runErrorT,
 	mapErrorT,
 	module Control.Monad,
 	module Control.Monad.Fix,
diff --git a/Control/Monad/Identity.hs b/Control/Monad/Identity.hs
index 52c8459..5a6f5ad 100644
--- a/Control/Monad/Identity.hs
+++ b/Control/Monad/Identity.hs
@@ -21,7 +21,6 @@
 
 module Control.Monad.Identity (
 	Identity(..),
-	runIdentity,
 	module Control.Monad,
 	module Control.Monad.Fix,
    ) where
diff --git a/Control/Monad/List.hs b/Control/Monad/List.hs
index 11aa3bf..275b600 100644
--- a/Control/Monad/List.hs
+++ b/Control/Monad/List.hs
@@ -15,7 +15,6 @@
 
 module Control.Monad.List (
 	ListT(..),
-	runListT,
 	mapListT,
 	module Control.Monad,
 	module Control.Monad.Trans,
diff --git a/Control/Monad/RWS.hs b/Control/Monad/RWS.hs
index 5175c7f..d3801cf 100644
--- a/Control/Monad/RWS.hs
+++ b/Control/Monad/RWS.hs
@@ -20,13 +20,11 @@
 
 module Control.Monad.RWS (
 	RWS(..),
-	runRWS,
 	evalRWS,
 	execRWS,
 	mapRWS,
 	withRWS,
 	RWST(..),
-	runRWST,
 	evalRWST,
 	execRWST,
 	mapRWST,
diff --git a/Control/Monad/Reader.hs b/Control/Monad/Reader.hs
index f0e617a..a8c6427 100644
--- a/Control/Monad/Reader.hs
+++ b/Control/Monad/Reader.hs
@@ -22,11 +22,9 @@ module Control.Monad.Reader (
 	MonadReader(..),
 	asks,
 	Reader(..),
-	runReader,
 	mapReader,
 	withReader,
 	ReaderT(..),
-	runReaderT,
 	mapReaderT,
 	withReaderT,
 	module Control.Monad,
diff --git a/Control/Monad/State.hs b/Control/Monad/State.hs
index 9f67f6d..cafdd72 100644
--- a/Control/Monad/State.hs
+++ b/Control/Monad/State.hs
@@ -23,13 +23,11 @@ module Control.Monad.State (
 	modify,
 	gets,
 	State(..),
-	runState,
 	evalState,
 	execState,
 	mapState,
 	withState,
 	StateT(..),
-	runStateT,
 	evalStateT,
 	execStateT,
 	mapStateT,
diff --git a/Control/Monad/Writer.hs b/Control/Monad/Writer.hs
index 0ef1ab0..415ca7f 100644
--- a/Control/Monad/Writer.hs
+++ b/Control/Monad/Writer.hs
@@ -23,11 +23,9 @@ module Control.Monad.Writer (
 	listens,
 	censor,
 	Writer(..),
-	runWriter,
 	execWriter,
 	mapWriter,
 	WriterT(..),
-	runWriterT,
 	execWriterT,
 	mapWriterT,
 	module Control.Monad,