Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- How do I create a thread pool?
- runPool :: Int -> [IO a] -> IO [a]
- threadPoolIO :: Int -> (a -> IO b) -> IO (Chan a, Chan b)
- threadPoolIO nr mutator = do
- input forkIO (forever $ do
- i [IO a] -> IO [a]
- runPool n as = do
- (input, output)
Add Comment
Please, Sign In to add comment