[commit: testsuite] master: Remove redundant SafeHaskell tests (7e08249)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/testsuite

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/7e0824966d6bc5485e2264abd99d1cf20f75eaf0

>---------------------------------------------------------------

commit 7e0824966d6bc5485e2264abd99d1cf20f75eaf0
Author: Ian Lynagh <ian at well-typed.com>
Date:   Fri Mar 1 15:18:22 2013 +0000

    Remove redundant SafeHaskell tests

>---------------------------------------------------------------

 tests/safeHaskell/unsafeLibs/Dep01.hs     |   13 -------------
 tests/safeHaskell/unsafeLibs/Dep01.stderr |    4 ----
 tests/safeHaskell/unsafeLibs/Dep02.hs     |   16 ----------------
 tests/safeHaskell/unsafeLibs/Dep02.stderr |    4 ----
 tests/safeHaskell/unsafeLibs/all.T        |    2 --
 5 files changed, 0 insertions(+), 39 deletions(-)

diff --git a/tests/safeHaskell/unsafeLibs/Dep01.hs b/tests/safeHaskell/unsafeLibs/Dep01.hs
deleted file mode 100644
index 5ee1cd0..0000000
--- a/tests/safeHaskell/unsafeLibs/Dep01.hs
+++ /dev/null
@@ -1,13 +0,0 @@
-module Dep01 where
-
-import Control.Monad
-import Control.Monad.ST
-import Data.STRef
-
-sumST :: Num a => [a] -> IO a
-sumST xs = unsafeSTToIO $ do
-    n <- newSTRef 0
-    forM_ xs $ \x -> do
-        modifySTRef n (+x)
-    readSTRef n
-
diff --git a/tests/safeHaskell/unsafeLibs/Dep01.stderr b/tests/safeHaskell/unsafeLibs/Dep01.stderr
deleted file mode 100644
index 656408b..0000000
--- a/tests/safeHaskell/unsafeLibs/Dep01.stderr
+++ /dev/null
@@ -1,4 +0,0 @@
-
-Dep01.hs:8:12: Warning:
-    In the use of ‛unsafeSTToIO’ (imported from Control.Monad.ST):
-    Deprecated: "Please import from Control.Monad.ST.Unsafe instead; This will be removed in the next release"
diff --git a/tests/safeHaskell/unsafeLibs/Dep02.hs b/tests/safeHaskell/unsafeLibs/Dep02.hs
deleted file mode 100644
index f9dbb26..0000000
--- a/tests/safeHaskell/unsafeLibs/Dep02.hs
+++ /dev/null
@@ -1,16 +0,0 @@
-module Dep02 where
-
-import Control.Monad
-import Control.Monad.ST.Lazy
-import Data.STRef.Lazy
-
-sumST :: Num a => [a] -> a
-sumST xs = runST $ do
-    n <- newSTRef 0
-    forM_ xs $ \x -> do
-        modifySTRef n (+x)
-    readSTRef n
-
-badST :: ()
-badST = runST $ unsafeIOToST $ putStrLn "Hello World"
-
diff --git a/tests/safeHaskell/unsafeLibs/Dep02.stderr b/tests/safeHaskell/unsafeLibs/Dep02.stderr
deleted file mode 100644
index 4ea40a8..0000000
--- a/tests/safeHaskell/unsafeLibs/Dep02.stderr
+++ /dev/null
@@ -1,4 +0,0 @@
-
-Dep02.hs:15:17: Warning:
-    In the use of ‛unsafeIOToST’ (imported from Control.Monad.ST.Lazy):
-    Deprecated: "Please import from Control.Monad.ST.Lazy.Unsafe instead; This will be removed in the next release"
diff --git a/tests/safeHaskell/unsafeLibs/all.T b/tests/safeHaskell/unsafeLibs/all.T
index 81fd18a..605f7de 100644
--- a/tests/safeHaskell/unsafeLibs/all.T
+++ b/tests/safeHaskell/unsafeLibs/all.T
@@ -10,8 +10,6 @@ def f( name, opts ):
 setTestOpts(f)
 
 # Check correct methods are deprecated
-test('Dep01', normal, compile, [''])
-test('Dep02', normal, compile, [''])
 test('Dep05', normal, compile_fail, [''])
 test('Dep06', normal, compile_fail, [''])
 test('Dep07', normal, compile_fail, [''])