anchor.diff:    (:metaclass container-class)
     (:alien-name "GtkOptionMenu"))
   
  -(defclass option-menu-child (button-child))
  +(defclass option-menu-child (button-child)
  +  ()
  +  (:metaclass child-class))
   
   
   (defclass item (bin)
     ()
     (:metaclass container-class)
  -  (:alien-name "GtkOptionMenu"))
  -
  -(defclass item-child (bin-child))
  -
  +  (:alien-name "GtkItem"))
  +
  +(defclass item-child (bin-child)
  +  ()
  +  (:metaclass child-class))
  +
  +;; Forward declaration
  +(defclass menu-item (item)
  +  ()
  +  (:metaclass container-class)
  +  (:alien-name "GtkMenuItem"))
   
   (defclass menu-item (item)
     ((label
  
positive.code:     :type unsigned-int)
     (row-spacing
      :allocation :arg
      :accessor table-row-spacing
      :initarg :row-spacing
      :type unsigned-int)
     (column-spacing
      :allocation :arg
      :accessor table-column-spacing
      :initarg :column-spacing
      :type unsigned-int)
     (homogeneous
  
negative.code:   (:metaclass container-class)
    (:alien-name "GtkWindow"))
  
  (defclass window-child (bin-child)
    ()
    (:metaclass child-class))
  
  
  ; (defclass color-selection-dialog window
  