Up – Package index » git-kv » Library git-kv.search » Git_searchmodule SHA1 = Digestif .SHA1 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 type path = [ | `Tag of string * path | `Commit of path | `Path of string list ] Source val find_tree_root : pred list -> SHA1 .t optionSource val find_tag : 'a -> [> `Tag of 'a * 'b ] list -> 'b optionSource val find_tree : 'a -> [> `Tree of 'a * 'b * 'c ] list -> ('b * 'c ) optionSource val mem :
Git_store.t ->
SHA1 .t ->
([< `Commit of 'a | `Path of string list | `Tag of string * 'a Path ] as 'a) ->
bool Lwt .t