anchor.diff:  
   (defbinding rc-get-style () style
     (widget widget))
  -
  -
  -
  -;;; Accelerator Groups
  -#|
  -(defbinding accel-group-activate (accel-group key modifiers) boolean
  -  (accel-group accel-group)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type))
  -
  -(defbinding accel-groups-activate (object key modifiers) boolean
  -  (object object)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type))
  -
  -(defbinding accel-group-attach () nil
  -  (accel-group accel-group)
  -  (object object))
  -
  -(defbinding accel-group-detach () nil
  -  (accel-group accel-group)
  -  (object object))
  -
  -(defbinding accel-group-lock () nil
  -  (accel-group accel-group))
  -
  -(defbinding accel-group-unlock () nil
  -  (accel-group accel-group))
  -
  -
  -;;; Accelerator Groups Entries
  -
  -(defbinding accel-group-get-entry (accel-group key modifiers) accel-entry
  -  (accel-group accel-group)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type))
  -
  -(defbinding accel-group-lock-entry (accel-group key modifiers) nil
  -  (accel-group accel-group)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type))
  -
  -(defbinding accel-group-unlock-entry (accel-group key modifiers) nil
  -  (accel-group accel-group)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type))
  -
  -(defbinding accel-group-add
  -    (accel-group key modifiers flags object signal) nil
  -  (accel-group accel-group)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type)
  -  (flags accel-flags)
  -  (object object)
  -  ((name-to-string signal) string))
  -
  -(defbinding accel-group-add (accel-group key modifiers object) nil
  -  (accel-group accel-group)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type)
  -  (object object))
  -
  -
  -;;; Accelerator Signals
  -
  -(defbinding accel-group-handle-add
  -    (object signal-id accel-group key modifiers flags) nil
  -  (object object)
  -  (signal-id unsigned-int)
  -  (accel-group accel-group)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type)
  -  (flags accel-flags))
  -
  -(defbinding accel-group-handle-remove
  -    (object accel-group key modifiers) nil
  -  (object object)
  -  (accel-group accel-group)
  -  ((gdk:keyval-from-name key) unsigned-int)
  -  (modifiers gdk:modifier-type))
  -|#
  
positive.code: 
  ;;; Acccel group
  
  
  
  ;;; Acccel label
  
  (defbinding accel-label-refetch () boolean
    (accel-label accel-label))
  
  
  ;;; Accessible
  
negative.code: ;; License along with this library; if not, write to the Free Software
  ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  
  ;; $Id: gtk.lisp,v 1.31 2005-01-13 00:17:55 espen Exp $
  
  
  (in-package "GTK")
  