Up
Module
Fields
Signature
val
names : string list
val
final_ok_timeout : (
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
val
send_receive_timeout : (
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
val
tls : (
t
, (
Domain_suffix.t
*
Tls.t
) list)
Fieldslib.Field.t
val
greeting : (
t
, string
Core.Std.sexp_option
)
Fieldslib.Field.t
val
fold : init:'acc__0 -> greeting:('acc__0 -> (
t
, string
Core.Std.sexp_option
)
Fieldslib.Field.t
-> 'acc__1) -> tls:('acc__1 -> (
t
, (
Domain_suffix.t
*
Tls.t
) list)
Fieldslib.Field.t
-> 'acc__2) -> send_receive_timeout:('acc__2 -> (
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> 'acc__3) -> final_ok_timeout:('acc__3 -> (
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> 'acc__4) -> 'acc__4
val
make_creator : greeting:((
t
, string
Core.Std.sexp_option
)
Fieldslib.Field.t
-> 'acc__0 -> ('input__ -> string
Core.Std.sexp_option
) * 'acc__1) -> tls:((
t
, (
Domain_suffix.t
*
Tls.t
) list)
Fieldslib.Field.t
-> 'acc__1 -> ('input__ -> (
Domain_suffix.t
*
Tls.t
) list) * 'acc__2) -> send_receive_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> 'acc__2 -> ('input__ -> [
| `Default
| `This
of
Core.Std.Time.Span.t
]) * 'acc__3) -> final_ok_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> 'acc__3 -> ('input__ -> [
| `Default
| `This
of
Core.Std.Time.Span.t
]) * 'acc__4) -> 'acc__0 -> ('input__ ->
t
) * 'acc__4
val
create : greeting:string
Core.Std.sexp_option
-> tls:(
Domain_suffix.t
*
Tls.t
) list -> send_receive_timeout:[
| `Default
| `This
of
Core.Std.Time.Span.t
] -> final_ok_timeout:[
| `Default
| `This
of
Core.Std.Time.Span.t
] ->
t
val
map : greeting:((
t
, string
Core.Std.sexp_option
)
Fieldslib.Field.t
-> string
Core.Std.sexp_option
) -> tls:((
t
, (
Domain_suffix.t
*
Tls.t
) list)
Fieldslib.Field.t
-> (
Domain_suffix.t
*
Tls.t
) list) -> send_receive_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> [
| `Default
| `This
of
Core.Std.Time.Span.t
]) -> final_ok_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> [
| `Default
| `This
of
Core.Std.Time.Span.t
]) ->
t
val
iter : greeting:((
t
, string
Core.Std.sexp_option
)
Fieldslib.Field.t
-> unit) -> tls:((
t
, (
Domain_suffix.t
*
Tls.t
) list)
Fieldslib.Field.t
-> unit) -> send_receive_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> unit) -> final_ok_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> unit) -> unit
val
for_all : greeting:((
t
, string
Core.Std.sexp_option
)
Fieldslib.Field.t
-> bool) -> tls:((
t
, (
Domain_suffix.t
*
Tls.t
) list)
Fieldslib.Field.t
-> bool) -> send_receive_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> bool) -> final_ok_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> bool) -> bool
val
exists : greeting:((
t
, string
Core.Std.sexp_option
)
Fieldslib.Field.t
-> bool) -> tls:((
t
, (
Domain_suffix.t
*
Tls.t
) list)
Fieldslib.Field.t
-> bool) -> send_receive_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> bool) -> final_ok_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> bool) -> bool
val
to_list : greeting:((
t
, string
Core.Std.sexp_option
)
Fieldslib.Field.t
-> 'elem__) -> tls:((
t
, (
Domain_suffix.t
*
Tls.t
) list)
Fieldslib.Field.t
-> 'elem__) -> send_receive_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> 'elem__) -> final_ok_timeout:((
t
, [
| `Default
| `This
of
Core.Std.Time.Span.t
])
Fieldslib.Field.t
-> 'elem__) -> 'elem__ list
val
map_poly : ([<
| `Read
| `Set_and_create
],
t
, 'x0)
Fieldslib.Field.user
-> 'x0 list
module
Direct
: sig .. end