external set_sort_column : [>`clist] obj -> int -> unit
      = "ml_gtk_clist_set_sort_column"