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