From d744fb498fb30fa6e951e2846ce4518a5721938f Mon Sep 17 00:00:00 2001 From: ross Date: Tue, 11 Jan 2005 14:36:51 +0000 Subject: [PATCH] [project @ 2005-01-11 14:36:51 by ross] System.IO no longer re-exports System.IO.Error --- System/IO.hs | 22 ---------------------- 1 file changed, 22 deletions(-) diff --git a/System/IO.hs b/System/IO.hs index 729806f..7468250 100644 --- a/System/IO.hs +++ b/System/IO.hs @@ -161,8 +161,6 @@ module System.IO ( openTempFile, openBinaryTempFile, #endif - - module System.IO.Error, ) where #ifdef __GLASGOW_HASKELL__ @@ -170,7 +168,6 @@ import GHC.Base import GHC.IOBase -- Together these four Prelude modules define import GHC.Handle -- all the stuff exported by IO for the GHC version import GHC.IO -import GHC.ST ( fixST ) import GHC.Exception import GHC.Num import GHC.Read @@ -224,25 +221,6 @@ import IO import NHC.IOExtras (fixIO) #endif -import System.IO.Error ( - isAlreadyExistsError, isDoesNotExistError, -- :: IOError -> Bool - isAlreadyInUseError, isFullError, - isEOFError, isIllegalOperation, - isPermissionError, isUserError, - - ioeGetErrorString, -- :: IOError -> String - ioeGetHandle, -- :: IOError -> Maybe Handle - ioeGetFileName, -- :: IOError -> Maybe FilePath - - try, -- :: IO a -> IO (Either IOError a) - - -- re-exports of Prelude names - IOError, - ioError, -- :: IOError -> IO a - userError, -- :: String -> IOError - catch -- :: IO a -> (IOError -> IO a) -> IO a - ) - -- ----------------------------------------------------------------------------- -- Standard IO -- 1.7.10.4