Module Process_result.Error

type error =
  1. | Wrong_status of {
    1. status : Unix.process_status;
    2. message : string;
    }
  2. | Wrong_behavior of {
    1. message : string;
    }
type res = t
type t = [
  1. | `Process_error of error
]
val make : error -> [> t ]
val fail : ?attach:(string * Attached_result.content) list -> error -> ('a, [> t ]) Asynchronous_result.t
val wrong_status : ?attach:(string * Attached_result.content) Base__List.t -> < err : string list ; out : string list ; status : Unix.process_status.. > -> ('a, Stdlib.Format.formatter, unit, ('b, [> t ]) Asynchronous_result.t) Stdlib.format4 -> 'c
val wrong_behavior : ?attach:(string * Attached_result.content) list -> ('a, Stdlib.Format.formatter, unit, ('b, [> t ]) Asynchronous_result.t) Stdlib.format4 -> 'c
val pp : Stdlib.Format.formatter -> [< `Process_error of error ] -> unit
val fail_if_non_zero : res -> string -> (unit, [> t ]) Asynchronous_result.t