Hello Andrew,

Monday, November 5, 2007, 11:12:33 PM, you wrote:

> How do I alter this to compute fn in multiple threads in parallel? (As

jobs :: [IO()]
let fork job = do mvar <- newEmptyMVar
                  forkIO$ do job; putMVar mvar ()
                  return mvar
tasks <- mapM fork jobs
mapM_ takeMVar tasks


these runs jobs and waits before all them will be finished


-- 
Best regards,
 Bulat                            mailto:[EMAIL PROTECTED]

_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to