module Amall_http_server:sig
..end
typeport =
int
typeaddr_string =
string
typelisten_addr =
[ `Inet_addr of Unix.inet_addr * port
| `Inet_any of port
| `Inet_loopback of port
| `Inet_str of addr_string * port ]
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