let render ~run_program ~host ~install_tools_path tool =
let path =
install_tools_path // Tool_def.to_directory_name tool.tool_definition in
let ensure =
git_installation
~run_program ~host
~install_path:path
~install_program:(tool.install_program ~path)
~witness:(tool.witness ~host ~path)
~repository:tool.repository
~recursive:tool.recursive
tool.tool_definition
in
Machine.Tool.create tool.tool_definition ~ensure
~init:(tool.init_program path)