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