summaryrefslogtreecommitdiff
path: root/libraries/base/GHC/Event/EPoll.hsc
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/base/GHC/Event/EPoll.hsc')
-rw-r--r--libraries/base/GHC/Event/EPoll.hsc10
1 files changed, 7 insertions, 3 deletions
diff --git a/libraries/base/GHC/Event/EPoll.hsc b/libraries/base/GHC/Event/EPoll.hsc
index 922ebf6252..dafb68f55e 100644
--- a/libraries/base/GHC/Event/EPoll.hsc
+++ b/libraries/base/GHC/Event/EPoll.hsc
@@ -1,4 +1,4 @@
-{-# LANGUAGE Unsafe #-}
+{-# LANGUAGE Trustworthy #-}
{-# LANGUAGE CPP
, ForeignFunctionInterface
, GeneralizedNewtypeDeriving
@@ -6,8 +6,9 @@
, BangPatterns
#-}
---
--- | A binding to the epoll I/O event notification facility
+-----------------------------------------------------------------------------
+-- |
+-- A binding to the epoll I/O event notification facility
--
-- epoll is a variant of poll that can be used either as an edge-triggered or
-- a level-triggered interface and scales well to large numbers of watched file
@@ -15,6 +16,8 @@
--
-- epoll decouples monitor an fd from the process of registering it.
--
+-----------------------------------------------------------------------------
+
module GHC.Event.EPoll
(
new
@@ -205,3 +208,4 @@ foreign import ccall safe "sys/epoll.h epoll_wait"
c_epoll_wait :: CInt -> Ptr Event -> CInt -> CInt -> IO CInt
#endif /* defined(HAVE_EPOLL) */
+