layout only.
commit17541c9635fe071efe10a51b2b54b97572efc9e4
authorKazu Yamamoto <kazu@iij.ad.jp>
dateTue 2 Dec 2014, 09:57 (12 years ago)
parentedf5475
warp/Network/Wai/Handler/Warp/Settings.hs+2−2
@@ -60,8 +60,8 @@ data Settings = Settings
6060 --
6161 -- This may be useful if you need OS bound threads, or if
6262 -- you wish to develop an alternative threading model.
63− --
64− -- Default: void . forkIOWithUnmask
63+ --
64+ -- Default: void . forkIOWithUnmask
6565 --
6666 -- Since 3.0.4
6767
warp/Network/Wai/Handler/Warp/Windows.hs+1−2
@@ -10,8 +10,7 @@ import Control.Concurrent
1010import Control.Monad
1111
1212windowsThreadBlockHack :: IO a -> IO a
13−windowsThreadBlockHack act =
14− do
13+windowsThreadBlockHack act = do
1514 var <- newEmptyMVar :: IO (MVar (Either SomeException a))
1615 void . forkIO $ try act >>= putMVar var
1716 res <- takeMVar var