external set_row_height : [>`clist] obj -> int -> unit
      = "ml_gtk_clist_set_row_height"