@@ -1,3 +1,4 @@
1+{-# LANGUAGE CPP #-}
12-- | In a multithreaded environment, running actions on a regularly scheduled
23-- background thread can dramatically improve performance.
34-- For example, web servers need to return the current time with each HTTP response.
@@ -40,6 +41,9 @@ module Control.AutoUpdate (
4041 , mkAutoUpdate
4142 ) where
4243
44+#if __GLASGOW_HASKELL__ < 709
45+import Control.Applicative ((<*>))
46+#endif
4347import Control.Concurrent (forkIO, threadDelay)
4448import Control.Concurrent.MVar (newEmptyMVar, putMVar, readMVar,
4549 takeMVar, tryPutMVar)