Make.Errs
module Io = Fm.Io
type t = [
|
Errors.Base.t
`Io_misc of Io.misc_error
]
val t : t Irmin.Type.t
val raise_error : [< t ] -> 'a
val log_error : string -> [< t ] -> unit
val catch : (unit -> 'a) -> ('a, t) Stdlib.result
val raise_if_error : ('a, [< t ]) Stdlib.result -> 'a
val log_if_error : string -> ('a, [< t ]) Stdlib.result -> unit