struct type t = Ketrew_target.Condition.t let (&&) a b = `And [a; b] let chain_and l = `And l let never = `Never let program ?(returns=0) ?host p = `Command_returns (Ketrew_target.Command.program ?host p, returns) end