([> `gtk ] as 'a) Gtk.obj ->
object ('b)
  val after : bool
  val obj : 'Gtk.obj
  method after : 'b
  method private connect :
    'c. ('a, 'c) GtkSignal.t -> callback:'-> GtkSignal.id
  method destroy : callback:(unit -> unit) -> GtkSignal.id
end