external set_background :
      [>`clist] obj -> row:int -> Gdk.color Gpointer.optboxed -> unit
      = "ml_gtk_clist_set_background"