let hisat tool =
let open KEDSL in
let url, hisat_binary =
let open Machine.Tool.Default in
match tool with
| one when one = hisat ->
"http://ccb.jhu.edu/software/hisat/downloads/hisat-0.1.6-beta-Linux_x86_64.zip",
"hisat"
| two when two = hisat2 ->
"ftp://ftp.ccb.jhu.edu/pub/infphilo/hisat2/downloads/hisat2-2.0.2-beta-Linux_x86_64.zip",
"hisat2"
| other ->
failwithf "Can't install Hisat version: %s" (Tool_def.to_string other)
in
Installable_tool.make tool
~url
~witness:(witness_file hisat_binary)
~install_program:KEDSL.Program.(fun ~path ->
shf "mv hisat* %s" path
)
~init_program:add_to_dollar_path