adding comments.
commit02f7c1f9377704973025d5d818d5813ce1ee4830
authorKazu Yamamoto <kazu@iij.ad.jp>
dateTue 21 Jul 2015, 11:23 (11 years ago)
parent019ab41
warp/Network/Wai/Handler/Warp/HTTP2/Manager.hs+3
@@ -25,6 +25,9 @@ data Command = Stop | Spawn | Replace ThreadId
2525
2626data Manager = Manager (TQueue Command) (IORef (IO ()))
2727
28+-- | Starting a thread pool manager.
29+-- Its action is 'return ()' to allow the action can include
30+-- this manager itself.
2831start :: IO Manager
2932start = do
3033 tset <- newThreadSet