sig val cast : 'a Gobject.obj -> Gtk.plug Gtk.obj module S : sig val embedded : ([> `plug ], unit -> unit) GtkSignal.t end external create : Gdk.xid -> Gtk.plug Gtk.obj = "ml_gtk_plug_new" end