Runtime_events.User
type tag = ..
type 'value t
val register : string -> tag -> 'value Type.t -> 'value t
val write : 'value t -> 'value -> unit
val name : 'a t -> string
val tag : 'a t -> tag