anchor.diff:  (defclass list-item-child (item-child))
     
   
  +;; deprecated
   (defclass tree-item (item)
     ()
   ;   :slots
  
positive.code:   (:alien-name "GtkTearoffMenuItem"))
  
  (defclass tearoff-menu-item-child (menu-item-child))
  
  (defclass list-item (item)
    ()
  
negative.code:   (:metaclass container-class)
    (:alien-name "GtkScrolledWindow"))
  
  (defclass scrolled-window-child (bin-child)
    ()
    (:metaclass child-class))
  
  
  (defclass viewport (bin)
    ((hadjustment
      :allocation :arg
      :accessor viewport-hadjustment
      :initarg :hadjustment
      :type adjustment)   
     (vadjustment
      :allocation :arg
      :accessor viewport-vadjustment
      :initarg :vadjustment
      :type adjustment)
     (shadow-type
      :allocation :arg
      :accessor viewport-shadow-type
      :initarg :shadow-type
      :type shadow-type))
    (:metaclass container-class)
    (:alien-name "GtkViewport"))
  
  (defclass viewport-child (bin-child)
    ()
    (:metaclass child-class))
    
  
  (defclass box (container)
    ((spacing
  