anchor.diff:    (:export-class-name-p t)
     (:export-accessor-names-p t)
     (:accessor-name-transformer #'class*:name-identity))
  +(define-user-class window (gobject-gtk-window))
   
   (define-class gobject-gtk-buffer ()
     ((gtk-object)
  
positive.code: ;;   (webkit:webkit-web-view-go-to-back-forward-list-item
  ;;    (gobject-gtk-object buffer)
  ;;    (webkit-history-entry-gobject-gtk-object history-entry)))
  
  
  (define-user-class window (gobject-gtk-window))
  (define-user-class buffer (gobject-gtk-buffer))
  (define-user-class browser (gobject-gtk-browser))
  
negative.code:   (:export-class-name-p t)
    (:export-accessor-names-p t)
    (:accessor-name-transformer #'class*:name-identity))
  (define-user-class buffer (gobject-gtk-buffer))
  
  (define-class data-manager-data-path (data-path)
    ((ref :initform "data-manager"))
  