Devices.Gitval git_client : git_client Functoria.typval git_merge_clients : (git_client -> git_client -> git_client) Functoria.implval git_tcp : (Tcp.tcpv4v6 -> Mimic.mimic -> git_client) Functoria.implval git_ssh :
?authenticator:string option Functoria.runtime_arg ->
string option Functoria.runtime_arg ->
string option Functoria.runtime_arg ->
(Mclock.mclock ->
Tcp.tcpv4v6 ->
Time.time ->
Mimic.mimic ->
git_client)
Functoria.implval git_http :
?authenticator:string option Functoria.runtime_arg ->
(string * string) list Functoria.runtime_arg option ->
(Pclock.pclock -> Tcp.tcpv4v6 -> Mimic.mimic -> git_client) Functoria.impl