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