sig
  val cast : 'a Gobject.obj -> Gtk.plug Gtk.obj
  module S : sig val embedded : ([> `plug ], unit -> unit) GtkSignal.t end
end