sig
  type col_desc = [ `Pixmap of string option | `String of string ]
  type col_row_contents =
      [ `Pixmap of GdkPixbuf.pixbuf option | `String of string ]
  class ['a] tree_edit :
    ?m_edit:string ->
    ?m_add:string ->
    ?m_remove:string ->
    ?m_close:string ->
    ?f_expand:('-> bool) ->
    f_roots:(unit -> 'a list) ->
    f_children:('-> 'a list) ->
    ?f_edit:('-> 'a) ->
    ?f_add:('a option -> 'a option) ->
    ?f_remove:('-> bool) ->
    ?f_close:(unit -> unit) ->
    f_contents:('-> Gmytree.col_row_contents list) ->
    [< `Pixmap of '| `String of 'c ] list ->
    object
      val mutable selection : 'a option
      method add : unit -> unit
      method add_button :
        string -> ('a option -> (unit -> unit) -> unit) -> unit
      method box : GPack.box
      method buttons_box : GPack.box
      method edit : unit -> unit
      method father_data : Gtk.tree_iter -> 'a option
      method insert : ?append:bool -> ?parent:Gtk.tree_iter -> '-> unit
      method menu : GToolbox.menu_entry list
      method on_double_click : '-> unit
      method on_select : '-> unit
      method on_unselect : '-> unit
      method remove : unit -> unit
      method remove_row : Gtk.tree_iter -> bool
      method select : '-> unit
      method selected_row : Gtk.tree_iter option
      method set_row : Gtk.tree_iter -> '-> unit
      method unselect : '-> unit
      method update : unit
      method view : GTree.view
    end
end