anchor.diff:    (width int)
     (height int)
     (preserve-aspect-ratio boolean)
  -  (nil null))
  +  (nil gerror :out))
   
   (defun pixbuf-load (filename &key width height size (preserve-aspect-ratio t))
     #-gtk2.6
     (unless preserve-aspect-ratio 
       (warn ":preserve-aspect-ratio not supported with this version of Gtk"))
   
  -  (cond
  -   (size 
  -    #-gtk2.6(%pixbuf-new-from-file-at-size filename size size)
  -    #+gtk2.6(%pixbuf-new-from-file-at-scale filename size size preserve-aspect-ratio))
  -   ((and width height)
  -    #-gtk2.6(%pixbuf-new-from-file-at-size filename width height)
  -    #+gtk2.6(%pixbuf-new-from-file-at-scale filename width height preserve-aspect-ratio))
  -   ((or width height)
  -    (error "Both :width and :height must be specified"))
  -   ((%pixbuf-new-from-file filename))))
  +  (multiple-value-bind (pixbuf gerror)
  +      (cond
  +       (size 
  +	#-gtk2.6(%pixbuf-new-from-file-at-size filename size size)
  +	#+gtk2.6(%pixbuf-new-from-file-at-scale filename size size preserve-aspect-ratio))
  +       ((and width height)
  +	#-gtk2.6(%pixbuf-new-from-file-at-size filename width height)
  +	#+gtk2.6(%pixbuf-new-from-file-at-scale filename width height preserve-aspect-ratio))
  +       ((or width height)
  +	(error "Both :width and :height must be specified"))
  +       (t (%pixbuf-new-from-file filename)))
  +    (if gerror
  +	(signal-gerror gerror)
  +      pixbuf)))
   
   
   ;; (defbinding pixbuf-get-file-info () (copy-of pixbuf-format)
  
positive.code:   (pixbuf pixbuf)
    (filename pathname)
    (type string)
    (keys (vector (or null string)))
    (values (vector (or null string)))
    (nil null))
  
  (defun pixbuf-save (pixbuf filename type &rest options)
    (let ((keys (make-array 0 :adjustable t :fill-pointer t))
  
negative.code: 
  (defbinding %pixbuf-new-from-file () (referenced pixbuf)
    (filename pathname)
    (nil gerror :out))
  
  (defbinding %pixbuf-new-from-file-at-size () (referenced pixbuf)
    (filename pathname)
    (width int)
    (height int)
    (nil gerror :out))
  
  #+gtk2.6
  (defbinding %pixbuf-new-from-file-at-scale () (referenced pixbuf)
  