module HS:Amall_http_server.Http_server
(
IO
)
(
I
)
val it_post_vars : (Cd_All.Strings.Latin1.char, (string * string) list) I.iteratee
val post_form : Amall_http.request ->
(Cd_All.Strings.Latin1.char, Amall_http.request * (string * string) list)
I.iteratee
val run : [< `Inet_addr of Unix.inet_addr * int
| `Inet_any of int
| `Inet_loopback of int
| `Inet_str of string * int ] ->
(Amall_http.request ->
Amall_http.segpath * H.service_desc) ->
IO.server