module Tls : sig ... end
module Domain_suffix : Core.Identifiable
type t
=
{
greeting : string Core.sexp_option; |
tls : (Domain_suffix.t * Tls.t) list; |
send_receive_timeout : [ `Default | `This of Core.Time.Span.t ]; |
final_ok_timeout : [ `Default | `This of Core.Time.Span.t ]; |
}
include sig ... end
val t_of_sexp : Base.Sexp.t ‑> t
val sexp_of_t : t ‑> Base.Sexp.t
val final_ok_timeout : t ‑> [ `Default | `This of Core.Time.Span.t ]
val send_receive_timeout : t ‑> [ `Default | `This of Core.Time.Span.t ]
val tls : t ‑> (Domain_suffix.t * Tls.t) list
val greeting : t ‑> string Core.sexp_option
module Fields : sig ... end
val default : t
val load_exn : string ‑> t Async.Deferred.t
val has_tls : t ‑> bool
val send_receive_timeout : t ‑> Core.Time.Span.t
val final_ok_timeout : t ‑> Core.Time.Span.t