Git_store (p.git-kv.0.2.0.doc.git-kv.mem.Git

module SHA1 = Digestif.SHA1

Sourcemodule Reference : sig ... end

Sourcemodule Commit : sig ... end

Sourcemodule Tree : sig ... end

Sourcemodule Blob : sig ... end

Sourcemodule Tag : sig ... end

Sourcemodule Object : sig ... end

Sourcemodule User : sig ... end

Sourcemodule Endpoint : sig ... end

Sourceval src : Logs.src

Sourcemodule Log : Logs.LOG

Sourcetype t = {

values : (SHA1.t, Git_store__.Git_object.t) Hashtbl.t;
refs : (string, [ `H of SHA1.t | `R of string ]) Hashtbl.t;
shallows : Git_store__.Git_shallow.t;
root : Fpath.t;
mutable head : Git_store__.Git_reference.contents option;

}

Sourceval read_exn : t -> SHA1.t -> Git_store__.Git_object.t

Sourceval is_shallowed : t -> SHA1.t -> bool Lwt.t

Sourceval shallowed : t -> Git_store__.Git_shallow.SHA1.t list Lwt.t

Sourceval shallow : t -> Git_store__.Git_shallow.SHA1.t -> unit Lwt.t

Sourceval unshallow : t -> SHA1.t -> unit Lwt.t

Source

val read : 
  t ->
  SHA1.t ->
  (Git_store__.Git_object.t, [> `Not_found of SHA1.t ]) result

Source

val write : 
  t ->
  Git_store__.Git_object.t ->
  (Git_store__.Git_object.SHA1.t, 'a) result

Sourceval v : Fpath.t -> (t, 'a) result Lwt.t

Sourcemodule Traverse : sig ... end

Source

val fold : 
  t ->
  ('a ->
    ?name:Fpath.t ->
    length:int64 ->
    Digestif.SHA1.t ->
    Git_store__.Git_object.t ->
    'a Lwt.t) ->
  path:Fpath.t ->
  'a ->
  Digestif.SHA1.t ->
  'a Lwt.t

Source

val iter : 
  t ->
  (Digestif.SHA1.t -> Git_store__.Git_object.t -> unit Lwt.t) ->
  Digestif.SHA1.t ->
  unit Lwt.t

Sourcemodule Ref : sig ... end

Sourcetype error = [

| `Not_found of SHA1.t
| `Reference_not_found of string
| `Msg of string

]

Source

val pp_error : 
  Format.formatter ->
  [< `Msg of string | `Not_found of SHA1.t | `Reference_not_found of string ] ->
  unit