external set_cell_style : [>`clist] obj -> int -> int -> Gtk.style -> unit = "ml_gtk_clist_set_cell_style"