unit ->
object
  val tbl : (int, < get_oid : int >) Hashtbl.t
  method add : < get_oid : int > -> unit
  method find : GObj.widget -> < get_oid : int >
  method remove : GObj.widget -> unit
end