sig
  val cast : '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