Messages.Table
module MH : sig ... end
val messages_table : unit MH.t
val messages_list : MH.key list Stdlib.ref
val mem : MH.key -> bool
val add_hook : (Message.t -> unit) Stdlib.ref
val add : MH.key -> unit
val to_list : unit -> MH.key list
val to_yojson : unit -> [> `List of Yojson.Safe.t list ]