@@ -16,16 +16,18 @@ import qualified Paths_warp
1616
1717----------------------------------------------------------------
1818
19+-- | The version of Warp.
1920warpVersion :: String
2021warpVersion = showVersion Paths_warp.version
2122
2223----------------------------------------------------------------
2324
24−-- | TCP port number
25+-- | TCP port number.
2526type Port = Int
2627
2728----------------------------------------------------------------
2829
30+-- | The type for header value used with 'HeaderName'.
2931type HeaderValue = ByteString
3032
3133hTransferEncoding :: HeaderName