module Blob : sig ... end
module Commit : sig ... end
module Tree : sig ... end
module Tag : sig ... end
type t = Git.Value.Make(Hash)(Inflate)(Deflate).t =
| Blob of Blob.t |
| Commit of Commit.t |
| Tree of Tree.t |
| Tag of Tag.t |
val kind : t -> [ `Blob | `Commit | `Tag | `Tree ]
val pp_kind : [ `Blob | `Commit | `Tag | `Tree ] Fmt.t
module MakeMeta : functor (Meta : Encore.Meta.S) -> sig ... end
module A : sig ... end
module M : sig ... end
module D : sig ... end
module E : sig ... end
val hash : t -> int
module Set : sig ... end
module Map : sig ... end
val length : t -> int64