external select_item : [>`tree] obj -> pos:int -> unit
      = "ml_gtk_tree_select_item"