package sihl

  1. Overview
  2. Docs
package sihl
Legend:
Library
Module
Module type
Parameter
Class
Class type
val default_tries : int
val default_retry_delay : Sihl_utils.Time.duration
type 'a t = {
  1. name : string;
  2. input_to_string : 'a -> string option;
  3. string_to_input : string option -> ('a, string) Result.t;
  4. handle : input:'a -> (unit, string) Result.t Lwt.t;
  5. failed : unit -> (unit, string) Result.t Lwt.t;
  6. max_tries : int;
  7. retry_delay : Sihl_utils.Time.duration;
}
val pp : 'a. (Ppx_deriving_runtime.Format.formatter -> 'a -> Ppx_deriving_runtime.unit) -> Ppx_deriving_runtime.Format.formatter -> 'a t -> Ppx_deriving_runtime.unit
val show : 'a. (Ppx_deriving_runtime.Format.formatter -> 'a -> Ppx_deriving_runtime.unit) -> 'a t -> Ppx_deriving_runtime.string
val retry_delay : 'a t -> Sihl_utils.Time.duration
val max_tries : 'a t -> int
val failed : 'a t -> unit -> (unit, string) Result.t Lwt.t
val handle : 'a t -> input:'a -> (unit, string) Result.t Lwt.t
val string_to_input : 'a t -> string option -> ('a, string) Result.t
val input_to_string : 'a t -> 'a -> string option
val name : 'a t -> string
module Fields : sig ... end
val create : name:string -> input_to_string:('a -> string option) -> string_to_input:(string option -> ('b, string) Result.t) -> handle:(input:'c -> (unit, string) Result.t Lwt.t) -> ?failed:(unit -> (unit, string) Lwt_result.t) -> unit -> 'd t
val set_max_tries : int -> 'a t -> 'b t
val set_retry_delay : Sihl_utils.Time.duration -> 'a t -> 'b t