sig
  val async_eval : Galax_server_util.async_eval_sig
  val delay : float -> unit
  type http_request =
      Pervasives.in_channel * Pervasives.out_channel *
      Http.HTTP.http_method * Http.HTTP.header list * string option
  val http_tcp_server :
    bool ->
    (exn -> unit) ->
    (Galax_server.SERVERKIND.http_request -> unit) -> Unix.sockaddr -> unit
  val udp_server :
    bool -> (exn -> unit) -> (string -> unit) -> Unix.sockaddr -> unit
end