Exposing Web Server header helpers

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

View File

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

View File

@ -13,6 +13,7 @@
web-server/private/util)
(provide/contract
[print-headers (output-port? (listof header?) . -> . 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-file output-file (connection? path-string? bytes? bytes? (or/c pair? false/c) . -> . void)])