suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Exposing Web Server header helpers

Browse Source
This commit is contained in:
Jay McCarthy 2010-08-19 16:33:13 -06:00
parent 209d2a0cda
commit 99e44effbe
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
collects/web-server/http/request.rkt
View File

@ -7,6 +7,7 @@
web-server/http/request-structs) web-server/http/request-structs)
(provide/contract (provide/contract
[read-headers (-> input-port? (listof header?))]
[rename ext:read-request read-request [rename ext:read-request read-request
(connection? (connection?
tcp-listen-port? tcp-listen-port?

1
collects/web-server/http/response.rkt
View File

@ -13,6 +13,7 @@
web-server/private/util) web-server/private/util)
(provide/contract (provide/contract
[print-headers (output-port? (listof header?) . -> . void)]
[rename ext:output-response output-response (connection? response/c . -> . void)] [rename ext:output-response output-response (connection? response/c . -> . void)]
[rename ext:output-response/method output-response/method (connection? response/c bytes? . -> . void)] [rename ext:output-response/method output-response/method (connection? response/c bytes? . -> . void)]
[rename ext:output-file output-file (connection? path-string? bytes? bytes? (or/c pair? false/c) . -> . void)]) [rename ext:output-file output-file (connection? path-string? bytes? bytes? (or/c pair? false/c) . -> . void)])