Up
Module
Fields
Signature
val
names : string list
val
retry_intervals : (
t
,
Core.Std.Time.Span.t
list)
Fieldslib.Field.t
val
next_hop_choices : (
t
,
Address.t
list)
Fieldslib.Field.t
val
envelope : (
t
,
Envelope.t
)
Fieldslib.Field.t
val
fold : init:'acc__0 -> envelope:('acc__0 -> (
t
,
Envelope.t
)
Fieldslib.Field.t
-> 'acc__1) -> next_hop_choices:('acc__1 -> (
t
,
Address.t
list)
Fieldslib.Field.t
-> 'acc__2) -> retry_intervals:('acc__2 -> (
t
,
Core.Std.Time.Span.t
list)
Fieldslib.Field.t
-> 'acc__3) -> 'acc__3
val
make_creator : envelope:((
t
,
Envelope.t
)
Fieldslib.Field.t
-> 'acc__0 -> ('input__ ->
Envelope.t
) * 'acc__1) -> next_hop_choices:((
t
,
Address.t
list)
Fieldslib.Field.t
-> 'acc__1 -> ('input__ ->
Address.t
list) * 'acc__2) -> retry_intervals:((
t
,
Core.Std.Time.Span.t
list)
Fieldslib.Field.t
-> 'acc__2 -> ('input__ ->
Core.Std.Time.Span.t
list) * 'acc__3) -> 'acc__0 -> ('input__ ->
t
) * 'acc__3
val
create : envelope:
Envelope.t
-> next_hop_choices:
Address.t
list -> retry_intervals:
Core.Std.Time.Span.t
list ->
t
val
map : envelope:((
t
,
Envelope.t
)
Fieldslib.Field.t
->
Envelope.t
) -> next_hop_choices:((
t
,
Address.t
list)
Fieldslib.Field.t
->
Address.t
list) -> retry_intervals:((
t
,
Core.Std.Time.Span.t
list)
Fieldslib.Field.t
->
Core.Std.Time.Span.t
list) ->
t
val
iter : envelope:((
t
,
Envelope.t
)
Fieldslib.Field.t
-> unit) -> next_hop_choices:((
t
,
Address.t
list)
Fieldslib.Field.t
-> unit) -> retry_intervals:((
t
,
Core.Std.Time.Span.t
list)
Fieldslib.Field.t
-> unit) -> unit
val
for_all : envelope:((
t
,
Envelope.t
)
Fieldslib.Field.t
-> bool) -> next_hop_choices:((
t
,
Address.t
list)
Fieldslib.Field.t
-> bool) -> retry_intervals:((
t
,
Core.Std.Time.Span.t
list)
Fieldslib.Field.t
-> bool) -> bool
val
exists : envelope:((
t
,
Envelope.t
)
Fieldslib.Field.t
-> bool) -> next_hop_choices:((
t
,
Address.t
list)
Fieldslib.Field.t
-> bool) -> retry_intervals:((
t
,
Core.Std.Time.Span.t
list)
Fieldslib.Field.t
-> bool) -> bool
val
to_list : envelope:((
t
,
Envelope.t
)
Fieldslib.Field.t
-> 'elem__) -> next_hop_choices:((
t
,
Address.t
list)
Fieldslib.Field.t
-> 'elem__) -> retry_intervals:((
t
,
Core.Std.Time.Span.t
list)
Fieldslib.Field.t
-> 'elem__) -> 'elem__ list
val
map_poly : ([<
| `Read
| `Set_and_create
],
t
, 'x0)
Fieldslib.Field.user
-> 'x0 list
module
Direct
: sig .. end