diff options
Diffstat (limited to 'lang/ghc/files/patch-libraries__base__GHC__Event__KQueue.hsc')
-rw-r--r-- | lang/ghc/files/patch-libraries__base__GHC__Event__KQueue.hsc | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/lang/ghc/files/patch-libraries__base__GHC__Event__KQueue.hsc b/lang/ghc/files/patch-libraries__base__GHC__Event__KQueue.hsc new file mode 100644 index 000000000000..ffc1d3df082a --- /dev/null +++ b/lang/ghc/files/patch-libraries__base__GHC__Event__KQueue.hsc @@ -0,0 +1,18 @@ +--- ./libraries/base/GHC/Event/KQueue.hsc.orig 2013-04-18 23:30:14.000000000 +0200 ++++ ./libraries/base/GHC/Event/KQueue.hsc 2013-04-30 13:34:11.549185351 +0200 +@@ -235,10 +235,11 @@ + #endif + deriving (Bits, Eq, Num, Show, Storable) + +-#{enum Filter, Filter +- , filterRead = EVFILT_READ +- , filterWrite = EVFILT_WRITE +- } ++filterRead :: Filter ++filterRead = Filter (#const EVFILT_READ) ++ ++filterWrite :: Filter ++filterWrite = Filter (#const EVFILT_WRITE) + + data TimeSpec = TimeSpec { + tv_sec :: {-# UNPACK #-} !CTime |