やたー、mayhem できたよー
mayhem :: [(IO (), IO ())] -> IO ()
mayhem xs = do
forM_ xs $ \(event, reaction) -> fork $ forever $ do
event >> reaction
forever $ threadDelay $ 10 ^ 6
More than 5 years have passed since last update.
Register as a new user and use Qiita more conveniently
- You get articles that match your needs
- You can efficiently read back useful information
- You can use dark theme