anchor.diff:  
   (defbinding tree-selection-set-select-function (selection function) nil
     (selection tree-selection)
  -  ((callback %tree-selection-func) pointer)
  +  (%tree-selection-func callback)
     ((register-callback-function function) unsigned-int)
  -  ((callback user-data-destroy-func) pointer))
  +  (user-data-destroy-func callback))
   
   (defbinding tree-selection-get-selected 
       (selection &optional (iter (make-instance 'tree-iter))) boolean
  
positive.code:   (start tree-path)
    (end tree-path))
  
  
  
  ;;; Tree Store
  
negative.code: (defbinding cell-layout-set-cell-data-func (cell-layout cell function) nil
    (cell-layout cell-layout)
    (cell cell-renderer)
    (%cell-layout-data-func callback)
    ((register-callback-function function) unsigned-int)
    (user-data-destroy-func callback))
  
  (defbinding cell-layout-clear-attributes () nil
    (cell-layout cell-layout)
  