anchor.diff:      :type boolean))
     (:metaclass container-class)
     (:alien-name "GtkMenuItem"))
  -  
  -(defclass menu-item-child (item-child)
  -  ()
  -  (:metaclass child-class))
  -
  -  
  -(defclass check-menu-item (menu-item)
  -  ((active
  -    :allocation :virtual
  -    :location ("gtk_check_menu_item_get_active"
  -	       "gtk_check_menu_item_set_active")
  -    :accessor check-menu-item-active-p
  -    :initarg :active
  -    :type boolean)
  -   (toggle-indicator
  -    :allocation :virtual
  -    :location ("gtk_check_menu_item_get_show_toggle"
  -	       "gtk_check_menu_item_set_show_toggle")
  -    :accessor check-menu-item-toggle-indicator-p
  -    :initarg :toggle-indicator
  -    :type boolean))
  -  (:metaclass container-class)
  -  (:alien-name "GtkCheckMenuItem"))
  -
  -(defclass check-menu-item-child (menu-item-child)
  -  ()
  -  (:metaclass child-class))
   
   
   (defclass radio-menu-item (check-menu-item)
  
positive.code:     :type widget))
    (:metaclass container-class)
    (:alien-name "GtkPaned"))
  
  (defclass paned-child (container-child)
    ()
    (:metaclass child-class))
  
  
  (defclass hpaned (paned)
    ()
    (:metaclass container-class)
    (:alien-name "GtkHPaned"))
  
  (defclass hpaned-child (paned-child)
    ()
    (:metaclass child-class))
  
  
  (defclass vpaned (paned)
    ()
    (:metaclass container-class)
    (:alien-name "GtkVPaned"))
  
  (defclass vpaned-child (paned-child)
    ()
    (:metaclass child-class))
  
  
  (defclass layout (container)
  
negative.code: ;; Common Lisp bindings for GTK+ v2.0.x
  ;; Copyright (C) 1999-2001 Espen S. Johnsen <esj@stud.cs.uit.no>
  ;;
  ;; This library is free software; you can redistribute it and/or
  ;; modify it under the terms of the GNU Lesser General Public
  