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

Merge branch 'master' of git://factorcode.org/git/factor

db4
Doug Coleman 2008-03-07 16:45:30 -06:00
parent 915fd4e0f8 17abc90d48
commit ea9e04c694
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
extra/http/client/client.factor
View File

@ -2,7 +2,8 @@
! See http://factorcode.org/license.txt for BSD license.
USING: assocs http kernel math math.parser namespaces sequences
io io.sockets io.streams.string io.files io.timeouts strings
splitting calendar continuations accessors vectors io.encodings.binary ;
splitting calendar continuations accessors vectors io.encodings.latin1
io.encodings.binary ;
IN: http.client
: parse-url ( url -- resource host port )
@ -42,7 +43,7 @@ DEFER: (http-request)
] if ;
: (http-request) ( request -- response stream )
dup host>> over port>> <inet> <client> stdio set
dup host>> over port>> <inet> latin1 <client> stdio set
dup "r" set-global write-request flush read-response
do-redirect ;