1;; -*- scheme -*- 2 3;; From gdkkeys.h 4 5(define-method add_virtual_modifiers 6 (of-object "GdkKeymap") 7 (c-name "gdk_keymap_add_virtual_modifiers") 8 (return-type "none") 9 (parameters 10 '("GdkModifierType*" "state") 11 ) 12) 13 14(define-method map_virtual_modifiers 15 (of-object "GdkKeymap") 16 (c-name "gdk_keymap_map_virtual_modifiers") 17 (return-type "gboolean") 18 (parameters 19 '("GdkModifierType*" "state") 20 ) 21) 22 23;; From gdkscreen.h 24 25(define-method get_primary_monitor 26 (of-object "GdkScreen") 27 (c-name "gdk_screen_get_primary_monitor") 28 (return-type "gint") 29) 30 31