method prepend_data = fun c ?parent ?color () ->
    let iter = self#prepend ?parent () in
      self#set_data c ~row:iter ?color ();
      iter