From: qrczak Date: Fri, 18 May 2001 21:45:43 +0000 (+0000) Subject: [project @ 2001-05-18 21:45:43 by qrczak] X-Git-Tag: Approximately_9120_patches~1931 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=93a3a84a216aacf0431c4b3b94efb078734d4c70;p=ghc-hetmet.git [project @ 2001-05-18 21:45:43 by qrczak] Don't export throwErrnoIfRetry_ twice. --- diff --git a/ghc/lib/std/PrelCError.lhs b/ghc/lib/std/PrelCError.lhs index cb4656c..0e3ac24 100644 --- a/ghc/lib/std/PrelCError.lhs +++ b/ghc/lib/std/PrelCError.lhs @@ -1,5 +1,5 @@ % ----------------------------------------------------------------------------- -% $Id: PrelCError.lhs,v 1.8 2001/05/18 16:54:05 simonmar Exp $ +% $Id: PrelCError.lhs,v 1.9 2001/05/18 21:45:43 qrczak Exp $ % % (c) The FFI task force, 2000 % @@ -59,7 +59,6 @@ module PrelCError ( throwErrnoIf_, -- :: (a -> Bool) -> String -> IO a -> IO () throwErrnoIfRetry, -- :: (a -> Bool) -> String -> IO a -> IO a throwErrnoIfRetry_, -- :: (a -> Bool) -> String -> IO a -> IO () - throwErrnoIfRetry_, -- :: (a -> Bool) -> String -> IO a -> IO () throwErrnoIfMinus1, -- :: Num a -- => String -> IO a -> IO a throwErrnoIfMinus1_, -- :: Num a