Test_error.Settype nonrec 'error t = {soft_errors : 'error Error_accumulator.t; |
hard_errors : 'error Error_accumulator.t; |
exit_code : int option; |
}val empty : 'a tval max_severity : 'a t -> [> `Hard | `None | `Soft ]val all_errors : 'a t -> 'b Error_accumulator.tval soft_singleton : 'a -> 'b tval hard_singleton : ?exit_code:int -> 'a -> 'b tval of_soft_or_error : ( unit, Core.Error.t ) Core._result -> internal_error tval of_hard_or_error :
?exit_code:int ->
( unit, Core.Error.t ) Core._result ->
internal_error t