sig type t = [ `Exited of int | `Signaled of Core.Std.Signal.t | `Timeout of Core.Std.Time.Span.t ] val to_string : Process.Status.t -> string val sexp_of_t : Process.Status.t -> Sexplib.Sexp.t end