sig
  type t = { host : Ketrew_host.t; action : Ketrew_program.t; }
  val shell : ?host:Ketrew_host.t -> string -> Ketrew_target.Command.t
  val program :
    ?host:Ketrew_host.t -> Ketrew_program.t -> Ketrew_target.Command.t
  val get_host : Ketrew_target.Command.t -> Ketrew_host.t
  val log : Ketrew_target.Command.t -> Ketrew_pervasives.Log.t
  val to_string_hum : Ketrew_target.Command.t -> string
end