sig
  val cast : 'a Gobject.obj -> Gtk.separator Gtk.obj
  val create :
    Gtk.Tags.orientation ->
    Gtk.separator Gobject.param list -> Gtk.separator Gtk.obj
end