anchor.diff:  (defbinding label-get-text () string
     (label label))
   
  -(defbinding label-get-layout () pango:layout
  +(defbinding label-get-layout () (copy-of pango:layout)
     (label label))
   
   (defbinding label-get-selection-bounds () boolean
  
positive.code: 
  (defbinding stock-lookup () boolean
    (stock-id string)
    (stock-item stock-item :out))
    
  
  
  
negative.code: ;; License along with this library; if not, write to the Free Software
  ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  
  ;; $Id: gtk.lisp,v 1.18 2004-11-19 13:09:00 espen Exp $
  
  
  (in-package "GTK")
  
  ;;; Gtk version
  
  (defbinding check-version () (copy-of string)
    (required-major unsigned-int)
    (required-minor unsigned-int)
    (required-micro unsigned-int))
  