sig val select_child : ([> `list ], Gtk.widget Gtk.obj -> unit) GtkSignal.t val selection_changed : ([> `list ], unit -> unit) GtkSignal.t val unselect_child : ([> `list ], Gtk.widget Gtk.obj -> unit) GtkSignal.t end