sig
  val handlers_field : string
  val bind : (common -> unit) -> JSOO.obj -> unit
  val unbind : '-> JSOO.obj -> unit
  val clear : unit -> JSOO.obj -> unit
end