typeable/wai
1
0
Fork 0
mirror of https://github.com/typeable/wai.git synced 2025-01-08 15:37:19 +03:00
Code Issues Projects Releases Wiki Activity

adding doctests.

Browse Source
This commit is contained in:
Kazu Yamamoto 2013-11-01 13:49:40 +09:00
parent e087d4349a
commit 9e5f743761
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
warp/Network/Wai/Handler/Warp/RequestHeader.hs
View File

@ -32,6 +32,12 @@ parseHeaderLines (firstLine:otherLines) = do
----------------------------------------------------------------
-- |
--
-- >>> parseRequestLine "GET / HTTP/1.1"
-- ("GET","/","",HTTP/1.1)
-- >>> parseRequestLine "POST /cgi/search.cgi?key=foo HTTP/1.0"
-- ("POST","/cgi/search.cgi","?key=foo",HTTP/1.0)
parseRequestLine :: ByteString
-> IO (ByteString, ByteString, ByteString, H.HttpVersion)
parseRequestLine s =