From 9704c5d859f22d02a217c3a1e748d6a57fc2bfb7 Mon Sep 17 00:00:00 2001 From: Ross Paterson Date: Mon, 11 Aug 2008 17:50:39 +0000 Subject: [PATCH] threadDelay and friends are GHC-only --- Control/Concurrent.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Control/Concurrent.hs b/Control/Concurrent.hs index 38a08d2..a0faad0 100644 --- a/Control/Concurrent.hs +++ b/Control/Concurrent.hs @@ -427,6 +427,7 @@ runInUnboundThread action = do #endif /* __GLASGOW_HASKELL__ */ +#ifdef __GLASGOW_HASKELL__ -- --------------------------------------------------------------------------- -- threadWaitRead/threadWaitWrite @@ -618,3 +619,4 @@ foreign import ccall safe "fdReady" lock is woken up, but haven't found it to be useful for anything other than this example :-) -} +#endif /* __GLASGOW_HASKELL__ */ -- 1.7.10.4