Git.Reference
val of_string : string -> ( t, [> `Msg of string ] ) Stdlib.result
val v : string -> t
val segs : t -> string list
val pp : t Fmt.t
val head : t
val master : t
val to_string : t -> string
val pp_contents : pp:'uid Fmt.t -> 'uid contents Fmt.t
val uid : 'uid -> 'uid contents
module Packed : sig ... end
type ('t, 'uid, 'error, 's) store = {
atomic_wr : 't ->
t ->
string ->
( ( unit, 'error ) Stdlib.result, 's ) Carton.io; |
atomic_rd : 't -> t -> ( ( string, 'error ) Stdlib.result, 's ) Carton.io; |
uid_of_hex : string -> 'uid option; |
uid_to_hex : 'uid -> string; |
packed : 'uid Packed.packed; |
}
module type S = sig ... end