package git-kv
Module Git_searchSource
Source
type pred = [ | `Commit of SHA1.t| `Tag of string * SHA1.t| `Tree of string * SHA1.t * Git_store.Tree.perm| `Tree_root of SHA1.t
]Source
val pred :
Git_store.t ->
SHA1.t ->
[> `Commit of Digestif.SHA1.t
| `Tag of string * Git_store.Tag.SHA1.t
| `Tree of string * Digestif.SHA1.t * Git_store.Tree.perm
| `Tree_root of Digestif.SHA1.t ]
list
Lwt.tSource
val find :
Git_store.t ->
SHA1.t ->
([< `Commit of 'a | `Path of string list | `Tag of string * 'a Path ] as 'a) ->
(Git_store.Tree.perm * SHA1.t) option Lwt.tSource
val mem :
Git_store.t ->
SHA1.t ->
([< `Commit of 'a | `Path of string list | `Tag of string * 'a Path ] as 'a) ->
bool Lwt.t