package hg_lib

  1. Overview
  2. Docs
type t = {
  1. node : Open_hg_lib__.Hg_private.Node.Public.t;
  2. parents : [ `Zero | `One of Open_hg_lib__.Hg_private.Node.Public.t | `Two of Open_hg_lib__.Hg_private.Node.Public.t * Open_hg_lib__.Hg_private.Node.Public.t ];
  3. author : string;
  4. time : Time_unix.t;
  5. tags : string list;
  6. description : string;
}
val t_of_sexp : Sexplib0.Sexp.t -> t
val sexp_of_t : t -> Sexplib0.Sexp.t
val description : t -> string
val tags : t -> string list
val time : t -> Time_unix.t
val author : t -> string
val parents : t -> [ `One of Open_hg_lib__.Hg_private.Node.Public.t | `Two of Open_hg_lib__.Hg_private.Node.Public.t * Open_hg_lib__.Hg_private.Node.Public.t | `Zero ]
val node : t -> Open_hg_lib__.Hg_private.Node.Public.t
module Fields : sig ... end
val compare : t -> t -> int
val to_hg_style_string : t -> string