X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FEvent%2FKQueue.hsc;fp=System%2FEvent%2FKQueue.hsc;h=19c7adfc718e5f1a0810aa77421f58b22f1c968b;hb=5caacc93b6904c13dd363f3ba4815c25c6c4fb26;hp=4a86435209458d11d46e81c62cf9e2d87278fe54;hpb=a6ad1ebfcad259e9b8ba60c32ab04437e328f54a;p=ghc-base.git diff --git a/System/Event/KQueue.hsc b/GHC/Event/KQueue.hsc similarity index 98% rename from System/Event/KQueue.hsc rename to GHC/Event/KQueue.hsc index 4a86435..19c7adf 100644 --- a/System/Event/KQueue.hsc +++ b/GHC/Event/KQueue.hsc @@ -6,13 +6,13 @@ , BangPatterns #-} -module System.Event.KQueue +module GHC.Event.KQueue ( new , available ) where -import qualified System.Event.Internal as E +import qualified GHC.Event.Internal as E #include "EventConfig.h" #if !defined(HAVE_KQUEUE) @@ -41,10 +41,10 @@ import GHC.Err (undefined) import GHC.Num (Num(..)) import GHC.Real (ceiling, floor, fromIntegral) import GHC.Show (Show(show)) -import System.Event.Internal (Timeout(..)) +import GHC.Event.Internal (Timeout(..)) import System.Posix.Internals (c_close) import System.Posix.Types (Fd(..)) -import qualified System.Event.Array as A +import qualified GHC.Event.Array as A #if defined(HAVE_KEVENT64) import Data.Int (Int64)