summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2017-01-10 16:58:15 -0500
committerBen Gamari <ben@smart-cactus.org>2017-01-10 16:58:15 -0500
commit4c8f0737d77fcdc007ffa4241372ce199a532e2f (patch)
treec4a97c63fa9db6edc95e02a5e678e2c8fa36e426
parent630605eaa8af7b1249e23ed376523b4fd6f79803 (diff)
downloadhaskell-4c8f0737d77fcdc007ffa4241372ce199a532e2f.tar.gz
Fix warnings on OS X
-rw-r--r--libraries/base/GHC/Event/Control.hs6
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