anchor.diff:  	(format nil "Gtk+ v~A.~A" major minor) 
         (format nil "Gtk+ v~A.~A.~A" major minor micro))))
   
  -(defbinding get-default-language () string)
  +(defbinding get-default-language () (copy-of pango:language))
   
   
   ;;;; Initalization
  
positive.code: 
  (defbinding stock-lookup () boolean
    (stock-id string)
    (stock-item stock-item :out))
    
  
  
  
negative.code: (defbinding label-get-text () string
    (label label))
  
  (defbinding label-get-layout () (copy-of pango:layout)
    (label label))
  
  (defbinding label-get-selection-bounds () boolean
  