From 337e8dce81e1e16fdea4b2089abe8ab3c9e1c5d8 Mon Sep 17 00:00:00 2001 From: simonmar Date: Tue, 26 Mar 2002 17:03:08 +0000 Subject: [PATCH] [project @ 2002-03-26 17:03:08 by simonmar] Add type signatures for isAlreadyExistsErrorType & friends --- System/IO/Error.hs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/System/IO/Error.hs b/System/IO/Error.hs index 22becfb..8853c9d 100644 --- 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 -- 1.7.10.4