external set_mode : tree_selection -> selection_mode -> unit
    = "ml_gtk_tree_selection_set_mode"