Up

module Ir_sync

: sig

Store Synchronisation signatures.

#

module type S = sig

#

type t

#

type head

#

type tag

#

val create : Ir_conf.t -> t Lwt.t

#

val fetch : t -> ?depth:int -> uri:string -> tag -> [

| `Local of head

] option Lwt.t

#

val push : t -> ?depth:int -> uri:string -> tag -> [

| `Ok

| `Error

] Lwt.t

end

#

module None : functor (H : Tc.S0) -> functor (T : Tc.S0) -> S with type head = H.t and type tag = T.t

end