sig
  type t = [ `Exited of int | `Signaled of int | `Stopped of int ]
  val to_string : Ketrew.Unix_process.Exit_code.t -> string
  val to_log :
    Ketrew.Unix_process.Exit_code.t -> Ketrew_pure.Internal_pervasives.Log.t
end