method
set_data =
fun
s ~row
->
self
#
set ~row ~column:c_string s