Or_error (vcs-base.Vcs_base.Vcs.Git.Or

val exit0 : Vcs__.Git_output0.t -> (unit, Base.Error.t) Base.Result.t

val exit0_and_stdout : 
  Vcs__.Git_output0.t ->
  (string, Base.Error.t) Base.Result.t

val exit_code : 
  Vcs__.Git_output0.t ->
  accept:(int * 'a) list ->
  ('a, Base.Error.t) Base.Result.t

A convenient wrapper to write exhaustive match on a result conditioned by a list of accepted exit codes. If the exit code is not part of the accepted list, the function takes care of returning an error of the expected result type.