summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBrianLewis <>2009-05-08 10:36:56 (GMT)
committerLuite Stegeman <luite@luite.com>2009-05-08 10:36:56 (GMT)
commitbcc76c1b9faf15a3fe082a491a8bc5dbb36c2a13 (patch)
tree096f35b74604535d1ed3fb9031b5dca9a3a89c5e
parentf79f4b6078372d7834cb3c576204fe11f3671e99 (diff)
version 0.1.10.1.1
-rw-r--r--src/Control/Concurrent/ThreadManager.hs4
-rw-r--r--threadmanager.cabal2
2 files changed, 3 insertions, 3 deletions
diff --git a/src/Control/Concurrent/ThreadManager.hs b/src/Control/Concurrent/ThreadManager.hs
index 33d58cc..a9d9d26 100644
--- a/src/Control/Concurrent/ThreadManager.hs
+++ b/src/Control/Concurrent/ThreadManager.hs
@@ -9,7 +9,7 @@
module Control.Concurrent.ThreadManager
( ThreadManager
- , ThreadStatus
+ , ThreadStatus (..)
, make
, fork, forkn, getStatus, waitFor, waitForAll
) where
@@ -33,7 +33,7 @@ newtype ThreadManager = TM (MVar (M.Map ThreadId (MVar ThreadStatus)))
make :: IO ThreadManager
make = TM `fmap` newMVar M.empty
--- | Make a managed thread.
+-- | Make a managed thread. Uses 'forkIO'.
fork :: ThreadManager -> IO () -> IO ThreadId
fork (TM tm) action =
modifyMVar tm $ \m -> do
diff --git a/threadmanager.cabal b/threadmanager.cabal
index 44421e5..e992a39 100644
--- a/threadmanager.cabal
+++ b/threadmanager.cabal
@@ -1,5 +1,5 @@
name: threadmanager
-version: 0.1
+version: 0.1.1
license: BSD3
license-file: LICENSE
author: _Real World Haskell_, http://www.realworldhaskell.org/