git.iko.soy/typeable/wai
on master help sign in
adding comments.
02f7c1fKazu Yamamoto
warp/Network/Wai/Handler/Warp/HTTP2/Manager.hs+3
compare with master
unifiedsplit
@@ -25,6 +25,9 @@ data Command = Stop | Spawn | Replace ThreadId
25
25
26data Manager = Manager (TQueue Command) (IORef (IO ()))
26data Manager = Manager (TQueue Command) (IORef (IO ()))
27
27
28+-- | Starting a thread pool manager.
29+-- Its action is 'return ()' to allow the action can include
30+-- this manager itself.
28start :: IO Manager
31start :: IO Manager
29start = do
32start = do
30 tset <- newThreadSet
33 tset <- newThreadSet