`sig
type 'a t = ('a, Error.t) Result.t
val apply : ('a -> 'b) t -> 'a t -> 'b t
val map2 : 'a t -> 'b t -> f:('a -> 'b -> 'c) -> 'c t
val map3 : 'a t -> 'b t -> 'c t -> f:('a -> 'b -> 'c -> 'd) -> 'd t
val both : 'a t -> 'b t -> ('a * 'b) t
module Applicative_infix :
sig
val ( <*> ) : ('a -> 'b) t -> 'a t -> 'b t
val ( <* ) : 'a t -> unit t -> 'a t
val ( *> ) : unit t -> 'a t -> 'a t
end
val ( <*> ) : ('a -> 'b) t -> 'a t -> 'b t
val ( <* ) : 'a t -> unit t -> 'a t
val ( *> ) : unit t -> 'a t -> 'a t
val invariant : 'a Invariant_intf.inv -> 'a t Invariant_intf.inv
val ( >>= ) : 'a t -> ('a -> 'b t) -> 'b t
val ( >>| ) : 'a t -> ('a -> 'b) -> 'b t
module Monad_infix :
sig
val ( >>= ) : 'a t -> ('a -> 'b t) -> 'b t
val ( >>| ) : 'a t -> ('a -> 'b) -> 'b t
end
val bind : 'a t -> ('a -> 'b t) -> 'b t
val return : 'a -> 'a t
val map : 'a t -> f:('a -> 'b) -> 'b t
val join : 'a t t -> 'a t
val ignore_m : 'a t -> unit t
val all : 'a t list -> 'a list t
val all_ignore : unit t list -> unit t
val ignore : 'a Or_error.t -> unit Or_error.t
val try_with : ?backtrace:bool -> (unit -> 'a) -> 'a Or_error.t
val try_with_join :
?backtrace:bool -> (unit -> 'a Or_error.t) -> 'a Or_error.t
val ok_exn : 'a Or_error.t -> 'a
val of_exn : ?backtrace:[ `Get | `This of string ] -> exn -> 'a Or_error.t
val of_exn_result : ('a, exn) Result.t -> 'a Or_error.t
val error :
?strict:unit -> string -> 'a -> ('a -> Sexplib.Sexp.t) -> 'b Or_error.t
val error_string : string -> 'a Or_error.t
val errorf : ('a, unit, string, 'b Or_error.t) Pervasives.format4 -> 'a
val tag : 'a Or_error.t -> string -> 'a Or_error.t
val tag_arg :
'a Or_error.t -> string -> 'b -> ('b -> Sexplib.Sexp.t) -> 'a Or_error.t
val unimplemented : string -> 'a Or_error.t
val combine_errors : 'a Or_error.t list -> 'a list Or_error.t
val combine_errors_unit : unit Or_error.t list -> unit Or_error.t
module Stable :
sig
module V1 :
sig
type 'a t = 'a t
val map : 'a t -> f:('a -> 'b) -> 'b t
val t_of_sexp : (Sexplib.Sexp.t -> 'a) -> Sexplib.Sexp.t -> 'a t
val sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.t
val compare : ('a -> 'a -> int) -> 'a t -> 'a t -> int
val bin_t : 'a Bin_prot.Type_class.t -> 'a t Bin_prot.Type_class.t
val bin_read_t :
'a Bin_prot.Read.reader -> 'a t Bin_prot.Read.reader
val __bin_read_t__ :
'a Bin_prot.Read.reader -> (int -> 'a t) Bin_prot.Read.reader
val bin_reader_t :
'a Bin_prot.Type_class.reader -> 'a t Bin_prot.Type_class.reader
val bin_size_t : 'a Bin_prot.Size.sizer -> 'a t Bin_prot.Size.sizer
val bin_write_t :
'a Bin_prot.Write.writer -> 'a t Bin_prot.Write.writer
val bin_writer_t :
'a Bin_prot.Type_class.writer -> 'a t Bin_prot.Type_class.writer
end
module V2 :
sig
type 'a t = 'a t
val map : 'a t -> f:('a -> 'b) -> 'b t
val t_of_sexp : (Sexplib.Sexp.t -> 'a) -> Sexplib.Sexp.t -> 'a t
val sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.t
val compare : ('a -> 'a -> int) -> 'a t -> 'a t -> int
val bin_t : 'a Bin_prot.Type_class.t -> 'a t Bin_prot.Type_class.t
val bin_read_t :
'a Bin_prot.Read.reader -> 'a t Bin_prot.Read.reader
val __bin_read_t__ :
'a Bin_prot.Read.reader -> (int -> 'a t) Bin_prot.Read.reader
val bin_reader_t :
'a Bin_prot.Type_class.reader -> 'a t Bin_prot.Type_class.reader
val bin_size_t : 'a Bin_prot.Size.sizer -> 'a t Bin_prot.Size.sizer
val bin_write_t :
'a Bin_prot.Write.writer -> 'a t Bin_prot.Write.writer
val bin_writer_t :
'a Bin_prot.Type_class.writer -> 'a t Bin_prot.Type_class.writer
end
end
val t_of_sexp : (Sexplib.Sexp.t -> 'a) -> Sexplib.Sexp.t -> 'a Or_error.t
val sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a Or_error.t -> Sexplib.Sexp.t
val compare : ('a -> 'a -> int) -> 'a Or_error.t -> 'a Or_error.t -> int
val bin_t : 'a Bin_prot.Type_class.t -> 'a Or_error.t Bin_prot.Type_class.t
val bin_read_t :
'a Bin_prot.Read.reader -> 'a Or_error.t Bin_prot.Read.reader
val __bin_read_t__ :
'a Bin_prot.Read.reader -> (int -> 'a Or_error.t) Bin_prot.Read.reader
val bin_reader_t :
'a Bin_prot.Type_class.reader -> 'a Or_error.t Bin_prot.Type_class.reader
val bin_size_t :
'a Bin_prot.Size.sizer -> 'a Or_error.t Bin_prot.Size.sizer
val bin_write_t :
'a Bin_prot.Write.writer -> 'a Or_error.t Bin_prot.Write.writer
val bin_writer_t :
'a Bin_prot.Type_class.writer -> 'a Or_error.t Bin_prot.Type_class.writer
end`