module SHA1 = Digestif.SHA1Sourcetype perm = [ | `Normal| `Everybody| `Exec| `Link| `Dir| `Commit
] Sourceval string_of_perm :
[< `Commit | `Dir | `Everybody | `Exec | `Link | `Normal ] ->
string Sourceval perm_of_string :
string ->
[> `Commit | `Dir | `Everybody | `Exec | `Link | `Normal ] Sourceval equal_perm :
[> `Commit | `Dir | `Everybody | `Exec | `Link | `Normal ] ->
[> `Commit | `Dir | `Everybody | `Exec | `Link | `Normal ] ->
bool Sourcetype entry = {perm : perm;name : string;node : Digestif.SHA1.t;
} Sourceval equal_entry :
equal:(Digestif.SHA1.t -> Digestif.SHA1.t -> bool) ->
entry ->
entry ->
bool Sourcetype value = | Contents of string| Node of string
Sourceval is_empty : 'a list -> bool Sourceval iter : ('a -> unit) -> 'a list -> unit Sourceval equal : 'a -> 'a -> bool Sourceval compare : 'a -> 'a -> int