external set_column_justification : [>`clist] obj -> int -> justification -> unit = "ml_gtk_clist_set_column_justification"