Git (mirage.Devices.Git)

type git_client

val git_client : git_client Functoria.DSL.typ

val git_merge_clients : 
  (git_client -> git_client -> git_client) Functoria.DSL.impl

val git_tcp : (Tcp.tcpv4v6 -> Mimic.mimic -> git_client) Functoria.DSL.impl

val git_ssh : 
  ?group:string ->
  ?authenticator:string ->
  ?key:string ->
  ?password:string ->
  unit ->
  (Tcp.tcpv4v6 -> Mimic.mimic -> git_client) Functoria.DSL.impl

val git_http : 
  ?group:string ->
  ?authenticator:string ->
  ?headers:(string * string) list ->
  unit ->
  (Tcp.tcpv4v6 -> Mimic.mimic -> git_client) Functoria.DSL.impl