package git-unix

  1. Overview
  2. Docs
type kind =
  1. | Normal
  2. | Everybody
  3. | Exec
val kind_to_perm : kind -> [ `Normal | `Dir | `Exec | `Everybody | `Link | `Commit ]
val perm_of_kind : kind -> [ `Normal | `Dir | `Exec | `Everybody | `Link | `Commit ]
val perm_to_kind : [ `Normal | `Exec | `Everybody | `Link | `Commit ] -> kind
val kind_of_perm : [ `Normal | `Exec | `Everybody | `Link | `Commit ] -> kind
val pp_kind : kind Fmt.t
type time = {
  1. lsb32 : int32;
  2. nsec : int32;
}
val pp_time : time Fmt.t
type 'e flag = {
  1. assume : bool;
  2. extend : 'e option;
  3. stage : int;
  4. length : int;
}
val pp_flag : 'e Fmt.t -> 'e flag Fmt.t
type extend = {
  1. reserved : bool;
  2. skip_worktree : bool;
  3. intent_to_add : bool;
}
val pp_extend : extend Fmt.t
type info = {
  1. ctime : time;
  2. mtime : time;
  3. dev : int32;
  4. ino : int32;
  5. mode : kind;
  6. uid : int32;
  7. gid : int32;
  8. size : int32;
}
val pp_info : info Fmt.t
type entry = {
  1. info : info;
  2. hash : Store.Hash.t;
  3. flag : extend flag;
  4. path : Git.Path.t;
}
val pp_entry : entry Fmt.t
type index = entry list
val pp_index : index Fmt.t
OCaml

Innovation. Community. Security.