call/input-url - support headers and polymorphism
The types are tweaked to match the contracts and to support passing a list of headers to the connect procedure. The FIXME for polymorphism has also been removed as it is now parameterized to support "...The result of the handle procedure is the result of call/input-url..."
This commit is contained in:
parent
3bd9ab669f
commit
d534b19167
|
@ -66,7 +66,9 @@
|
||||||
[make-http-connection (-> HTTP-Connection)]
|
[make-http-connection (-> HTTP-Connection)]
|
||||||
[http-connection-close (HTTP-Connection -> Void)]
|
[http-connection-close (HTTP-Connection -> Void)]
|
||||||
|
|
||||||
[call/input-url (case-lambda [url url (Input-Port -> Any) -> Any])] ;;FIXME - need polymorphism
|
[call/input-url (All (T) (case-lambda
|
||||||
|
[url (url -> Input-Port) (Input-Port -> T) -> T]
|
||||||
|
[url (url (Listof String) -> Input-Port) (Input-Port -> T) (Listof String) -> T]))]
|
||||||
|
|
||||||
[current-proxy-servers (Parameter (Listof (List String String Integer)))]
|
[current-proxy-servers (Parameter (Listof (List String String Integer)))]
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user