Lockset.Lockmodule L : sig ... endinclude module type of struct include L endval equal : t -> t -> Ppx_deriving_runtime.boolval compare : t -> t -> Ppx_deriving_runtime.inttype group = Printable.Std.group = |val show_group : group -> 'aval printXml : 'a BatInnerIO.output -> (Addr.t * RW.t) -> unitval to_yojson :
(Addr.t * RW.t) ->
[> `Assoc of (string * Printable.json) list ]val invariant : Invariant.context -> (Addr.t * RW.t) -> Invariant.tval show : (Addr.t * bool) -> stringval pretty : unit -> (Addr.t * bool) -> Pretty.doc