Commit c89b5a19 authored by ian@well-typed.com's avatar ian@well-typed.com
Browse files

Remove GHC.IOBase

It's been deprecated since at least GHC 6.12
parent e6b690d5
{-# LANGUAGE Unsafe #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IOBase
-- Copyright : (c) The University of Glasgow 1994-2009
-- License : see libraries/base/LICENSE
--
-- Maintainer : cvs-ghc@haskell.org
-- Stability : internal
-- Portability : non-portable (GHC Extensions)
--
-- Backwards-compatibility interface
--
-----------------------------------------------------------------------------
module GHC.IOBase {-# DEPRECATED "use GHC.IO instead" #-} (
IO(..), unIO, failIO, liftIO, bindIO, thenIO, returnIO,
unsafePerformIO, unsafeInterleaveIO,
unsafeDupablePerformIO, unsafeDupableInterleaveIO,
noDuplicate,
-- To and from from ST
stToIO, ioToST, unsafeIOToST, unsafeSTToIO,
-- References
IORef(..), newIORef, readIORef, writeIORef,
IOArray(..), newIOArray, readIOArray, writeIOArray, unsafeReadIOArray, unsafeWriteIOArray,
MVar(..),
-- Handles, file descriptors,
FilePath,
Handle(..), Handle__(..), HandleType(..), IOMode(..), FD,
isReadableHandleType, isWritableHandleType, isReadWriteHandleType, showHandle,
-- Buffers
-- Buffer(..), RawBuffer, BufferState(..),
BufferList(..), BufferMode(..),
--bufferIsWritable, bufferEmpty, bufferFull,
-- Exceptions
Exception(..), ArithException(..), AsyncException(..), ArrayException(..),
stackOverflow, heapOverflow, ioException,
IOError, IOException(..), IOErrorType(..), ioError, userError,
ExitCode(..),
throwIO, block, unblock, blocked, catchAny, catchException,
evaluate,
ErrorCall(..), AssertionFailed(..), assertError, untangle,
BlockedOnDeadMVar(..), BlockedIndefinitely(..), Deadlock(..),
blockedOnDeadMVar, blockedIndefinitely
) where
import GHC.Base
import GHC.Exception
import GHC.IO
import GHC.IO.Handle.Types
import GHC.IO.IOMode
import GHC.IO.Exception
import GHC.IOArray
import GHC.IORef
import GHC.MVar
import Foreign.C.Types
import Data.Typeable
type FD = CInt
-- Backwards compat: this was renamed to BlockedIndefinitelyOnMVar
data BlockedOnDeadMVar = BlockedOnDeadMVar
deriving Typeable
instance Exception BlockedOnDeadMVar
instance Show BlockedOnDeadMVar where
showsPrec _ BlockedOnDeadMVar = showString "thread blocked indefinitely"
blockedOnDeadMVar :: SomeException -- for the RTS
blockedOnDeadMVar = toException BlockedOnDeadMVar
-- Backwards compat: this was renamed to BlockedIndefinitelyOnSTM
data BlockedIndefinitely = BlockedIndefinitely
deriving Typeable
instance Exception BlockedIndefinitely
instance Show BlockedIndefinitely where
showsPrec _ BlockedIndefinitely = showString "thread blocked indefinitely"
blockedIndefinitely :: SomeException -- for the RTS
blockedIndefinitely = toException BlockedIndefinitely
......@@ -83,7 +83,6 @@ Library {
GHC.IO.Handle.Types,
GHC.IO.IOMode,
GHC.IOArray,
GHC.IOBase,
GHC.IORef,
GHC.IP,
GHC.Int,
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment