Remove some functions deprecated since GHC 7.2.
authorIan Lynagh <ian@well-typed.com>
Fri, 1 Mar 2013 14:02:24 +0000 (14:02 +0000)
committerIan Lynagh <ian@well-typed.com>
Fri, 1 Mar 2013 14:02:24 +0000 (14:02 +0000)
Control/Monad/ST.hs
Control/Monad/ST/Lazy.hs

index 6113055..0d2f58b 100644 (file)
@@ -29,27 +29,7 @@ module Control.Monad.ST (
         -- * Converting 'ST' to 'IO'
         RealWorld,              -- abstract
         stToIO,
-
-        -- * Unsafe Functions
-        unsafeInterleaveST,
-        unsafeIOToST,
-        unsafeSTToIO
     ) where
 
 import Control.Monad.ST.Safe
-import qualified Control.Monad.ST.Unsafe as U
-
-{-# DEPRECATED unsafeInterleaveST, unsafeIOToST, unsafeSTToIO "Please import from Control.Monad.ST.Unsafe instead; This will be removed in the next release" #-} -- deprecated in 7.2
-
-{-# INLINE unsafeInterleaveST #-}
-unsafeInterleaveST :: ST s a -> ST s a
-unsafeInterleaveST = U.unsafeInterleaveST
-
-{-# INLINE unsafeIOToST #-}
-unsafeIOToST :: IO a -> ST s a
-unsafeIOToST = U.unsafeIOToST
-
-{-# INLINE unsafeSTToIO #-}
-unsafeSTToIO :: ST s a -> IO a
-unsafeSTToIO = U.unsafeSTToIO
 
index 26effa4..c212728 100644 (file)
@@ -28,22 +28,7 @@ module Control.Monad.ST.Lazy (
         -- * Converting 'ST' To 'IO'
         RealWorld,
         stToIO,
-
-        -- * Unsafe Functions
-        unsafeInterleaveST,
-        unsafeIOToST
     ) where
 
 import Control.Monad.ST.Lazy.Safe
-import qualified Control.Monad.ST.Lazy.Unsafe as U
-
-{-# DEPRECATED unsafeInterleaveST, unsafeIOToST "Please import from Control.Monad.ST.Lazy.Unsafe instead; This will be removed in the next release" #-} -- deprecated in 7.2
-
-{-# INLINE unsafeInterleaveST #-}
-unsafeInterleaveST :: ST s a -> ST s a
-unsafeInterleaveST = U.unsafeInterleaveST
-
-{-# INLINE unsafeIOToST #-}
-unsafeIOToST :: IO a -> ST s a
-unsafeIOToST = U.unsafeIOToST