From a058649879dc906e4e9c810ab5a0be4b2b878b14 Mon Sep 17 00:00:00 2001
From: Ross Paterson <ross@soi.city.ac.uk>
Date: Wed, 14 Jun 2006 11:44:56 +0000
Subject: [PATCH] add signature for registerDelay

---
 GHC/Conc.lhs |    1 +
 1 file changed, 1 insertion(+)

diff --git a/GHC/Conc.lhs b/GHC/Conc.lhs
index fb5cc6e..0b6bc91 100644
--- a/GHC/Conc.lhs
+++ b/GHC/Conc.lhs
@@ -583,6 +583,7 @@ threadDelay time
 	case delay# time# s of { s -> (# s, () #)
 	}}
 
+registerDelay :: Int -> IO (TVar Bool)
 registerDelay usecs 
 #ifndef mingw32_HOST_OS
   | threaded = waitForDelayEventSTM usecs
-- 
1.7.10.4