Up

module Tree

: sig

Git trees.

#
type perm = [
| `Normal
| `Exec
| `Link
| `Dir
| `Commit
]

File permission.

#
val string_of_perm : perm -> string

Raw represention of a permission, using the Git format.

#
type entry = {
# perm
: perm;
# name
: string;
# node
: SHA.t;
}

A tree entry. This is either a directory or a file. As this is supposed to model a filesystem, directory does not contain data.

#
type t = entry list

A tree is an hierarchical data-store. NB: data (eg. blobs) are only carried on the leafs.

include Object.S with type t := t
end