X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=System%2FEvent%2FEPoll.hsc;h=b2311c8940bb209b77ef492237870c6246c81d8b;hb=41e8fba828acbae1751628af50849f5352b27873;hp=098946e46ba76dbf716b3c30b0e24d29068f3f16;hpb=9520c5735e69668a33013c36f85152a1ef656b8d;p=ghc-base.git

diff --git a/System/Event/EPoll.hsc b/System/Event/EPoll.hsc
index 098946e..b2311c8 100644
--- a/System/Event/EPoll.hsc
+++ b/System/Event/EPoll.hsc
@@ -1,5 +1,9 @@
-{-# LANGUAGE ForeignFunctionInterface, GeneralizedNewtypeDeriving,
-    NoImplicitPrelude #-}
+{-# LANGUAGE CPP
+           , ForeignFunctionInterface
+           , GeneralizedNewtypeDeriving
+           , NoImplicitPrelude
+           , BangPatterns
+  #-}
 
 --
 -- | A binding to the epoll I/O event notification facility