module LockRef: sig .. end
sig
end
type 'a t
'a
val get : 'a t -> 'a
'a t -> 'a
val set : 'a t -> 'a -> unit
'a t -> 'a -> unit
val update : 'a t -> ('a -> 'a) -> unit
'a t -> ('a -> 'a) -> unit