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