Functor Amall_http_server.Http_server (.ml)

module Http_server: functor (IO : Amall_types.IO_Type) -> functor (I : It_type.IT  with type 'a It_IO.m = 'a IO.m
    and type It_IO.input_channel = IO.input_channel) -> sig .. end

Parameters:

`IO`	:	`Amall_types.IO_Type`
`I`	:	`It_type.IT with type 'a It_IO.m = 'a IO.m and type It_IO.input_channel = IO.input_channel`

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