include Git.S
type error = private [>
|
`Msg of string
|
`Not_found of hash
|
`Reference_not_found of Git__.Reference.t
]
val pp_error : error Fmt.t
module Hash : sig ... end
module Value : sig ... end
val dotgit : t -> Fpath.t
val size : t -> hash -> (int64, error) Stdlib.result Lwt.t
val read_opt :
t ->
hash ->
(Value.t option, [ `Msg of string ]) Stdlib.result Lwt.t
val mem : t -> hash -> bool Lwt.t
val list : t -> hash list Lwt.t
val batch_write :
t ->
hash ->
pck:(unit -> string option Lwt.t) ->
idx:(unit -> string option Lwt.t) ->
(unit, error) Stdlib.result Lwt.t
val fold :
t ->
('acc -> ?name:Fpath.t -> length:int64 -> hash -> Value.t -> 'acc Lwt.t) ->
path:Fpath.t ->
'acc ->
hash ->
'acc Lwt.t
val reset : t -> (unit, error) Stdlib.result Lwt.t
val read_inflated :
t ->
hash ->
([ `Blob | `Commit | `Tag | `Tree ] * Cstruct.t) option Lwt.t
val write_inflated :
t ->
kind:[ `Blob | `Commit | `Tag | `Tree ] ->
Cstruct.t ->
hash Lwt.t
val is_shallowed : t -> hash -> bool Lwt.t
val shallowed : t -> hash list Lwt.t
val shallow : t -> hash -> unit Lwt.t
val unshallow : t -> hash -> unit Lwt.t
val has_global_watches : bool
val has_global_checkout : bool
val v : ?dotgit:Fpath.t -> Fpath.t -> (t, error) Stdlib.result Lwt.t