Module Git_store.ReferenceSource

module SHA1 = Digestif.SHA1
Sourcetype t = string
Sourceval dir_sep : string
Sourceval dir_sep_char : char
Sourceval error_msgf : ('a, Format.formatter, unit, ('b, [> `Msg of string ]) result) format4 -> 'a
Sourceval validate_and_collapse_seps : string -> (string, [> `Msg of string ]) result
Sourceval of_string : string -> (string, [> `Msg of string ]) result
Sourceval v : string -> string
Sourceval is_seg : string -> bool
Sourceval add_seg : string -> string -> string
Sourceval append : string -> string -> string
Sourceval (/) : string -> string -> string
Sourceval (//) : string -> string -> string
Sourceval segs : string -> string list
Sourceval pp : Format.formatter -> string -> unit
Sourceval to_string : 'a -> 'a
Sourceval equal : String.t -> String.t -> bool
Sourceval compare : String.t -> String.t -> int
Sourceval head : string
Sourceval master : string
Sourceval main : string
Sourcemodule Ordered : sig ... end
Sourcemodule Map : sig ... end
Sourcemodule Set : sig ... end
Sourcetype contents =
  1. | Uid of SHA1.t
  2. | Ref of t
Sourceval equal_contents : equal:(SHA1.t -> SHA1.t -> bool) -> contents -> contents -> bool
Sourceval pp_contents : pp:(Format.formatter -> SHA1.t -> unit) -> Format.formatter -> contents -> unit
Sourceval compare_contents : compare:(SHA1.t -> SHA1.t -> int) -> contents -> contents -> int
Sourcemodule Packed : sig ... end
Sourcetype store = {
  1. expanded : (t, string) Hashtbl.t;
  2. packed : Packed.t;
}
Sourceval reword_error : ('a -> 'b) -> ('c, 'a) result -> ('c, 'b) result
Sourceval contents : 'a -> string -> contents
Sourceval resolve : store -> store -> String.t -> (SHA1.t, [> `Cycle | `Not_found of t ]) result Lwt.t
Sourceval read : store -> store -> t -> (contents, [> `Not_found of t ]) result Lwt.t
Sourceval write : store -> t -> contents -> (unit, 'a) result Lwt.t
Sourceval uid : SHA1.t -> contents
Sourceval ref : t -> contents