Repository : ssh://darcs.haskell.org//srv/darcs/packages/unix On branch : master
http://hackage.haskell.org/trac/ghc/changeset/389820b2bcdc32be728e05fd98b69382f9c55721 >--------------------------------------------------------------- commit 389820b2bcdc32be728e05fd98b69382f9c55721 Author: Simon Marlow <[email protected]> Date: Wed Apr 25 10:41:38 2012 +0100 use Control.Monad.void instead of Foreign.void (which is now deprecated) >--------------------------------------------------------------- System/Posix/ByteString/FilePath.hsc | 3 ++- System/Posix/Error.hs | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/System/Posix/ByteString/FilePath.hsc b/System/Posix/ByteString/FilePath.hsc index 55cd16a..f3ecd3c 100644 --- a/System/Posix/ByteString/FilePath.hsc +++ b/System/Posix/ByteString/FilePath.hsc @@ -29,7 +29,7 @@ module System.Posix.ByteString.FilePath ( throwErrnoPathIfMinus1_ ) where -import Foreign +import Foreign hiding ( void ) import Foreign.C hiding ( throwErrnoPath, throwErrnoPathIf, @@ -38,6 +38,7 @@ import Foreign.C hiding ( throwErrnoPathIfMinus1, throwErrnoPathIfMinus1_ ) +import Control.Monad import Data.ByteString import Data.ByteString.Char8 as BC import Prelude hiding (FilePath) diff --git a/System/Posix/Error.hs b/System/Posix/Error.hs index 73988dc..7c68941 100644 --- a/System/Posix/Error.hs +++ b/System/Posix/Error.hs @@ -28,8 +28,9 @@ module System.Posix.Error ( throwErrnoPathIfMinus1Retry_ ) where -import Foreign +import Foreign hiding (void) import Foreign.C +import Control.Monad throwErrnoPathIfMinus1Retry :: (Eq a, Num a) => String -> FilePath -> IO a -> IO a _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
