external unselect_all : [>`clist] obj -> unit = "ml_gtk_clist_unselect_all"