sig
  val send_CRLF : Pervasives.out_channel -> unit
  val send_status_line :
    ?version:Http_types.version ->
    code:Http_types.status_code -> Pervasives.out_channel -> unit
  val send_basic_headers :
    ?version:Http_types.version ->
    code:Http_types.status_code -> Pervasives.out_channel -> unit
  val send_header :
    header:string -> value:string -> Pervasives.out_channel -> unit
  val send_headers :
    headers:(string * string) list -> Pervasives.out_channel -> unit
  val send_file :
    src:Http_types.file_source -> Pervasives.out_channel -> unit
  val respond :
    ?body:string ->
    ?headers:(string * string) list ->
    ?version:Http_types.version ->
    ?code:Http_types.status_code -> Pervasives.out_channel -> unit
  val respond_not_found :
    url:string ->
    ?version:Http_types.version -> Pervasives.out_channel -> unit
  val respond_forbidden :
    url:string ->
    ?version:Http_types.version -> Pervasives.out_channel -> unit
  val respond_redirect :
    location:string ->
    ?body:string ->
    ?version:Http_types.version ->
    ?code:Http_types.status_code -> Pervasives.out_channel -> unit
  val respond_unauthorized :
    ?version:Http_types.version ->
    ?realm:string -> Pervasives.out_channel -> unit
  val respond_error :
    ?body:string ->
    ?version:Http_types.version ->
    ?code:Http_types.status_code -> Pervasives.out_channel -> unit
  val respond_file :
    fname:string ->
    ?version:Http_types.version -> Pervasives.out_channel -> unit
  val respond_with : Http_types.response -> Pervasives.out_channel -> unit
  val main : Http_types.daemon_spec -> unit
  val default_spec : Http_types.daemon_spec
  val daemon_spec :
    ?address:string ->
    ?auth:(string * Http_types.auth_info) option ->
    ?auto_close:bool ->
    ?callback:(Http_types.request -> Pervasives.out_channel -> unit) ->
    ?mode:Http_types.daemon_mode ->
    ?port:int ->
    ?root_dir:string option ->
    ?exn_handler:(exn -> Pervasives.out_channel -> unit) option ->
    ?timeout:int option -> unit -> Http_types.daemon_spec
  class daemon : ?addr:string -> ?port:int -> unit -> Http_types.daemon
  module Trivial :
    sig
      val callback : Http_types.request -> Pervasives.out_channel -> unit
      val main : Http_types.daemon_spec -> unit
    end
end