anchor.diff:  ;; Common Lisp bindings for GTK+ v2.0
  -;; Copyright (C) 1999-2005 Espen S. Johnsen <espen@users@sf.net>
  +;; Copyright (C) 1999-2005 Espen S. Johnsen <espen@users.sf.net>
   ;;
   ;; This library is free software; you can redistribute it and/or
   ;; modify it under the terms of the GNU Lesser General Public
  
positive.code: (defbinding keyboard-grab (window &key owner-events time) grab-status
    (window window)
    (owner-events boolean)
    ((%grab-time time) (unsigned 32)))
  
  (defbinding (keyboard-ungrab "gdk_display_keyboard_ungrab")
      (&optional (display (display-get-default)) time) nil
    (display display)
    ((%grab-time time) (unsigned 32)))
  
  
  
  
negative.code: (defbinding screen-width-mm () int)
  (defbinding screen-height-mm () int)
  
  (defbinding pointer-grab 
      (window &key owner-events events confine-to cursor time) grab-status
    (window window)
  