(define-gboxed-variant-cstruct event "GdkEvent"
  (type event-type)
  (window (g:object window))
  (send-event (:boolean :int8))
            ...
            ((:window-state) event-window-state
             (changed-mask window-state)
             (new-window-state window-state))
  ... ))