anchor.diff:      :initarg :gravity
       :type gravity))
     (:metaclass struct-class))
  +
  +(define-flags-type modifier-type
  +  :shift :lock :control :mod1 :mod2 :mod3 :mod4 :mod5 
  +  :button1 :button2 :button3 :button4 :button5
  +  (:release #.(ash 1 30)))
  
positive.code: ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  
  ;; $Id: gdktypes.lisp,v 1.19 2005-04-23 16:48:50 espen Exp $
  
  (in-package "GDK")
  
  
negative.code:     :initarg :height
      :type int))
    (:metaclass boxed-class))
  
  
  
  
  (define-types-by-introspection "Gdk"
  