val make : tree:Hash.t -> author:Git.User.t -> committer:Git.User.t -> ?parents:Hash.t list -> ?extra:(string * string list) list -> string -> 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
val committer : t -> Git.User.t
val author : t -> Git.User.t
val message : t -> string
val extra : t -> (string * string list) list