+(define-g-object-class "GdkDevice" gdk-device
+ (:superclass g-object :export t :interfaces
+ nil :type-initializer
+ "gdk_device_get_type")
+ ((:cffi name gdk-device-name :string
+ %gdk-device-name nil)
+ (:cffi source gdk-device-source gdk-input-source
+ %gdk-device-source "gdk_device_set_source")
+ (:cffi mode gdk-device-mode gdk-input-mode
+ %gdk-device-mode gdk_device_set_mode)
+ (:cffi has-cursor gdk-device-has-cursor :boolean
+ %gdk-device-has-cursor nil)
+ (:cffi n-axes gdk-device-n-axes :int
+ %gdk-device-n-axes nil)
+ (:cffi axes gdk-device-axes nil
+ %gdk-device-axes nil)
+ (:cffi keys gdk-device-keys nil
+ %gdk-device-keys nil)
+ (:cffi n-keys gdk-device-n-keys nil
+ %gdk-device-n-keys nil)))
+