diff options
author | Ben Gamari <ben@smart-cactus.org> | 2017-01-10 16:58:15 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2017-01-10 16:58:15 -0500 |
commit | 4c8f0737d77fcdc007ffa4241372ce199a532e2f (patch) | |
tree | c4a97c63fa9db6edc95e02a5e678e2c8fa36e426 | |
parent | 630605eaa8af7b1249e23ed376523b4fd6f79803 (diff) | |
download | haskell-4c8f0737d77fcdc007ffa4241372ce199a532e2f.tar.gz |
Fix warnings on OS X
-rw-r--r-- | libraries/base/GHC/Event/Control.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libraries/base/GHC/Event/Control.hs b/libraries/base/GHC/Event/Control.hs index 83950c24a6..9e3940ad19 100644 --- a/libraries/base/GHC/Event/Control.hs +++ b/libraries/base/GHC/Event/Control.hs @@ -35,7 +35,7 @@ import GHC.Conc.Signal (Signal) import GHC.Real (fromIntegral) import GHC.Show (Show) import GHC.Word (Word8) -import Foreign.C.Error (throwErrnoIfMinus1_, throwErrno, getErrno, eBADF) +import Foreign.C.Error (throwErrnoIfMinus1_, throwErrno, getErrno) import Foreign.C.Types (CInt(..), CSize(..)) import Foreign.ForeignPtr (mallocForeignPtrBytes, withForeignPtr) import Foreign.Marshal (alloca, allocaBytes) @@ -47,10 +47,10 @@ import System.Posix.Internals (c_close, c_pipe, c_read, c_write, import System.Posix.Types (Fd) #if defined(HAVE_EVENTFD) -import Foreign.C.Error (throwErrnoIfMinus1) +import Foreign.C.Error (throwErrnoIfMinus1, eBADF) import Foreign.C.Types (CULLong(..)) #else -import Foreign.C.Error (eAGAIN, eWOULDBLOCK, getErrno, throwErrno) +import Foreign.C.Error (eAGAIN, eWOULDBLOCK) #endif data ControlMessage = CMsgWakeup |