sig val cast : 'a Gobject.obj -> Gtk.radio_menu_item Gtk.obj external set_group : [> `radiomenuitem ] Gtk.obj -> Gtk.radio_menu_item Gtk.group -> unit = "ml_gtk_radio_menu_item_set_group" end