method
set_data =
fun
data ~row
->
self
#
set ~row ~column:c_caml data;
self
#
update_display row