Fix tests following the st split-off frmo base

testsuite/tests/ghc-regress/th/Makefile

@@ -5,7 +5,7 @@ include $(TOP)/mk/test.mk
 # Trac 2386 requires batch-compile not --make
 # Very important: without -O 
 T2386:
-	$(TEST_HC) -c T2386_Lib.hs -fforce-recomp
-	$(TEST_HC) -c T2386.hs -fforce-recomp
+	$(TEST_HC) -v0 -c T2386_Lib.hs -fforce-recomp
+	$(TEST_HC) -v0 -c T2386.hs -fforce-recomp
 
   
\ No newline at end of file

testsuite/tests/ghc-regress/th/T2386.stdout

-Loading package ghc-prim ... linking ... done.
-Loading package integer ... linking ... done.
-Loading package base ... linking ... done.
-Loading package array-0.1 ... linking ... done.
-Loading package containers-0.1 ... linking ... done.
-Loading package packedstring-0.1 ... linking ... done.
-Loading package pretty-1.0 ... linking ... done.
-Loading package template-haskell ... linking ... done.

testsuite/tests/ghc-regress/th/TH_reifyMkName.stderr

 
 TH_reifyMkName.hs:9:2: TyConI (TySynD Foo.C [] (ConT GHC.Types.Int))
-Loading package ghc-prim ... linking ... done.
-Loading package integer ... linking ... done.
-Loading package base ... linking ... done.
-Loading package array-0.1 ... linking ... done.
-Loading package containers-0.1 ... linking ... done.
-Loading package packedstring-0.1 ... linking ... done.
-Loading package pretty-1.0 ... linking ... done.
-Loading package template-haskell ... linking ... done.

testsuite/tests/ghc-regress/th/all.T

@@ -50,7 +50,7 @@ test('TH_reifyDecl2', normal, compile, ['-v0'])
 
 test('TH_reifyType1', normal, compile, [''])
 test('TH_reifyType2', normal, compile, [''])
-test('TH_reifyMkName', normal, compile, [''])
+test('TH_reifyMkName', normal, compile, ['-v0'])
 
 test('TH_spliceDecl1', normal, compile, ['-v0'])
 test('TH_spliceDecl2', normal, compile, ['-v0'])

testsuite/tests/ghc-regress/typecheck/should_compile/tc231.hs

@@ -12,7 +12,7 @@
 
 module ShouldCompile where
 
-import Control.Monad.ST
+import GHC.ST
 
 data Q s a chain = Node s a chain