X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FConc.lhs;h=a7f690213aec80bea84b878432e4bc36dd589eea;hb=40fe562f6d01f6076bf00a267dd24f57b45a1933;hp=47b6ef647846ed689d4800bc801387f0ed821751;hpb=ec7d7ba5e16fddc419a5f0da82a66764f5537c55;p=ghc-base.git

diff --git a/GHC/Conc.lhs b/GHC/Conc.lhs
index 47b6ef6..a7f6902 100644
--- a/GHC/Conc.lhs
+++ b/GHC/Conc.lhs
@@ -52,6 +52,7 @@ module GHC.Conc
         , registerDelay         -- :: Int -> IO (TVar Bool)
         , threadWaitRead        -- :: Int -> IO ()
         , threadWaitWrite       -- :: Int -> IO ()
+        , closeFd               -- :: (Int -> IO ()) -> Int -> IO ()
 
         -- * TVars
         , STM(..)