steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

http.client: add quot stack effect.

db4
John Benediktsson 2015-04-17 17:54:29 -07:00
parent a5339d48c8
commit 9eb365abe0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/http/client/client.factor
View File

@ -106,7 +106,7 @@ SYMBOL: redirects
read-crlf B{ } assert= read-chunked read-crlf B{ } assert= read-chunked
] if ; inline recursive ] if ; inline recursive
: read-response-body ( quot response -- ) : read-response-body ( quot: ( chunk -- ) response -- )
binary decode-input binary decode-input
"transfer-encoding" header "chunked" = "transfer-encoding" header "chunked" =
[ read-chunked ] [ each-block ] if ; inline [ read-chunked ] [ each-block ] if ; inline