X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FIO%2FHandle%2FFD.hs;h=4c380d6393e27f9bacdaafbfa88fbdfa01cc42f4;hb=1b83f2438da1471dd27eb6469d97be525af66c46;hp=fd188a852db879c6b5fa698a9de5e2dd22e19ad8;hpb=8bb6db3e726aa1eeb6d512bfb5165f9f9f92210c;p=ghc-base.git

diff --git a/GHC/IO/Handle/FD.hs b/GHC/IO/Handle/FD.hs
index fd188a8..4c380d6 100644
--- a/GHC/IO/Handle/FD.hs
+++ b/GHC/IO/Handle/FD.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE CPP, NoImplicitPrelude, PatternGuards #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, PatternGuards, ForeignFunctionInterface #-}
 
 -----------------------------------------------------------------------------
 -- |