diff options
| -rw-r--r-- | testsuite/tests/codeGen/should_run/cgrun068.hs | 3 | ||||
| -rw-r--r-- | testsuite/tests/ghci/scripts/T5979.script | 6 | ||||
| -rw-r--r-- | testsuite/tests/ghci/scripts/T5979.stderr | 2 | ||||
| -rw-r--r-- | testsuite/tests/typecheck/should_fail/T5300.hs | 2 | ||||
| -rw-r--r-- | testsuite/tests/typecheck/should_fail/T5691.hs | 2 |
5 files changed, 8 insertions, 7 deletions
diff --git a/testsuite/tests/codeGen/should_run/cgrun068.hs b/testsuite/tests/codeGen/should_run/cgrun068.hs index f5096ad998..9d9a0f954f 100644 --- a/testsuite/tests/codeGen/should_run/cgrun068.hs +++ b/testsuite/tests/codeGen/should_run/cgrun068.hs @@ -31,7 +31,8 @@ import Debug.Trace (trace) import Control.Exception (assert) import Control.Monad -import Control.Monad.State.Strict +import Control.Monad.Trans.State.Strict +import Control.Monad.Trans.Class import GHC.Exts import GHC.ST hiding (liftST) import Prelude hiding (length, read) diff --git a/testsuite/tests/ghci/scripts/T5979.script b/testsuite/tests/ghci/scripts/T5979.script index a233d3dac4..2873d7b8e7 100644 --- a/testsuite/tests/ghci/scripts/T5979.script +++ b/testsuite/tests/ghci/scripts/T5979.script @@ -1,4 +1,4 @@ :set -XPackageImports -import "nonexisting" Control.Monad.State -import "mtl" Control.Monad.State -import "mtl" Control.Monad.Reader +import "nonexisting" Control.Monad.Trans.State +import "transformers" Control.Monad.Trans.State +import "transformers" Control.Monad.Trans.Reader diff --git a/testsuite/tests/ghci/scripts/T5979.stderr b/testsuite/tests/ghci/scripts/T5979.stderr index 30bd30194f..84f8c6ba0b 100644 --- a/testsuite/tests/ghci/scripts/T5979.stderr +++ b/testsuite/tests/ghci/scripts/T5979.stderr @@ -1,4 +1,4 @@ <no location info>: - Could not find module `Control.Monad.State' + Could not find module `Control.Monad.Trans.State' It is not a module in the current program, or in any known package. diff --git a/testsuite/tests/typecheck/should_fail/T5300.hs b/testsuite/tests/typecheck/should_fail/T5300.hs index d052d84659..b15713d290 100644 --- a/testsuite/tests/typecheck/should_fail/T5300.hs +++ b/testsuite/tests/typecheck/should_fail/T5300.hs @@ -1,7 +1,7 @@ {-# LANGUAGE FunctionalDependencies, MultiParamTypeClasses #-} module T5300 where -import Control.Monad.State (StateT) +import Control.Monad.Trans.State (StateT) class C1 a b c | a -> b class C2 a b c diff --git a/testsuite/tests/typecheck/should_fail/T5691.hs b/testsuite/tests/typecheck/should_fail/T5691.hs index c63ba7b8d2..49fc776eac 100644 --- a/testsuite/tests/typecheck/should_fail/T5691.hs +++ b/testsuite/tests/typecheck/should_fail/T5691.hs @@ -4,7 +4,7 @@ module GHCBug where import Control.Applicative as Ap import Control.Monad (MonadPlus, mplus, mzero) -import Control.Monad.Identity (Identity, runIdentity) +import Data.Functor.Identity (Identity, runIdentity) newtype PrintRuleInterp v = MkPRI { printRule_ :: Int -> String } class Test p where |