[project @ 2002-03-26 17:03:08 by simonmar]

Add type signatures for isAlreadyExistsErrorType & friends

diff --git a/System/IO/Error.hs b/System/IO/Error.hs
index 22becfb..8853c9d 100644 (file)
--- a/System/IO/Error.hs
+++ b/System/IO/Error.hs
@@ -10,7 +10,7 @@
 -- Stability   :  provisional
 -- Portability :  portable
 --
--- $Id: Error.hs,v 1.1 2002/02/05 17:32:27 simonmar Exp $
+-- $Id: Error.hs,v 1.2 2002/03/26 17:03:08 simonmar Exp $
 --
 -- Standard IO Errors.
 --
@@ -117,6 +117,10 @@ userErrorType                = UserError
 -- -----------------------------------------------------------------------------
 -- IOErrorType predicates
 
+isAlreadyExistsErrorType, isDoesNotExistErrorType, isAlreadyInUseErrorType,
+  isFullErrorType, isEOFErrorType, isIllegalOperationErrorType, 
+  isPermissionErrorType, isUserErrorType :: IOErrorType -> Bool
+
 #ifdef __GLASGOW_HASKELL__
 isAlreadyExistsErrorType AlreadyExists = True
 isAlreadyExistsErrorType _ = False