module Store = Stype pred = [ | `Commit of Store.Hash.t |
| `Tag of string * Store.Hash.t |
| `Tree of string * Store.Hash.t |
| `Tree_root of Store.Hash.t |
]val pred : Store.t -> ?full:bool -> Store.Hash.t -> pred list Lwt.tval mem : Store.t -> Store.Hash.t -> path -> bool Lwt.tval find : Store.t -> Store.Hash.t -> path -> Store.Hash.t option Lwt.t