module HelloHtmlServer: sig .. end
sig
end
val serve : body:'a -> 'b -> Cohttp.Request.t -> Cohttp_async.Server.response Async.Std.Deferred.t
body:'a -> 'b -> Cohttp.Request.t -> Cohttp_async.Server.response Async.Std.Deferred.t
val main : int -> unit -> unit Async.Std.Deferred.t
int -> unit -> unit Async.Std.Deferred.t