git.iko.soy/typeable/wai
on master help sign in
doc update.
66e2a3aKazu Yamamoto
warp/Network/Wai/Handler/Warp/Timeout.hs+1
compare with master
unifiedsplit
@@ -97,6 +97,7 @@ initialize timeout = do
97
97
98----------------------------------------------------------------
98----------------------------------------------------------------
99
99
100+-- | Stopping timeout manager.
100stopManager :: Manager -> IO ()
101stopManager :: Manager -> IO ()
101stopManager (Manager ref) = E.mask_ $ do
102stopManager (Manager ref) = E.mask_ $ do
102 !handles <- breakForever ref
103 !handles <- breakForever ref
warp/Network/Wai/Handler/Warp/Types.hs+3−1
@@ -16,16 +16,18 @@ import qualified Paths_warp
16
16
17----------------------------------------------------------------
17----------------------------------------------------------------
18
18
19+-- | The version of Warp.
19warpVersion :: String
20warpVersion :: String
20warpVersion = showVersion Paths_warp.version
21warpVersion = showVersion Paths_warp.version
21
22
22----------------------------------------------------------------
23----------------------------------------------------------------
23
24
24−-- | TCP port number
25+-- | TCP port number.
25type Port = Int
26type Port = Int
26
27
27----------------------------------------------------------------
28----------------------------------------------------------------
28
29
30+-- | The type for header value used with 'HeaderName'.
29type HeaderValue = ByteString
31type HeaderValue = ByteString
30
32
31hTransferEncoding :: HeaderName
33hTransferEncoding :: HeaderName