(gobject:define-vtable ("GtkWidget" widget)
  ;; Parent class
  (:skip parent-instance (:struct gobject:object-class))
  ;; Virtual functions
  (show                   (:void (widget (g:object gtk:widget))))
  (hide                   (:void (widget (g:object gtk:widget))))
  (map                    (:void (widget (g:object gtk:widget))))
  (unmap                  (:void (widget (g:object gtk:widget))))
  (realize                (:void (widget (g:object gtk:widget))))
  (unrealize              (:void (widget (g:object gtk:widget))))
  (root                   (:void (widget (g:object gtk:widget))))
  (unroot                 (:void (widget (g:object gtk:widget))))
  (size-allocate          (:void
                           (widget (g:object gtk:widget))
                           (width :int)
                           (height :int)
                           (baseline :int)))
  (state-flags-changed    (:void
                           (widget (g:object gtk:widget))
                           (previous gtk:state-flags)))
  (direction-changed      (:void
                           (widget (g:object gtk:widget))
                           (previous gtk:text-direction)))
  (get-request-mode       (gtk:size-request-mode
                           (widget (g:object gtk:widget))))
  (measure                (:void
                           (widget (g:object gtk:widget))
                           (orientation gtk:orientation)
                           (for-size :int)
                           (minimum :int)
                           (natural :int)
                           (minimum-baseline :int)
                           (natural-baseline :int)))
  (mnemonic-activate      (:boolean
                           (widget (g:object gtk:widget))
                           (cycling :boolean)))
  (grab-focus             (:boolean (widget (g:object gtk:widget))))
  (focus                  (:boolean
                           (widget (g:object gtk:widget))
                           (direction gtk:direction-type)))
  (set-focus-child        (:void
                           (widget (g:object gtk:widget))
                           (child (g:object gtk:widget))))
  (move-focus             (:void
                           (widget (g:object gtk:widget))
                           (direction gtk:direction-type)))
  (keynav-failed          (:boolean
                           (widget (g:object gtk:widget))
                           (direction gtk:direction-type)))
  (query-tooltip          (:boolean
                           (widget (g:object gtk:widget))
                           (x :int)
                           (y :int)
                           (keyboard-tooltip :boolean)
                           (tooltip (g:object gtk:tooltip))))
  (compute-expand         (:void
                           (widget (g:object gtk:widget))
                           (hexpand-p :boolean)
                           (vexpand-p :boolean)))
  (css-changed            (:void
                           (widget (g:object gtk:widget))
                           (change gtk:css-style-change)))
  (system-setting-changed (:void
                           (widget (g:object gtk:widget))
                           (settings gtk:system-setting)))
  (snapshot               (:void
                           (widget (g:object gtk:widget))
                           (snapshot (g:object gtk:snapshot))))
  (contains               (:boolean
                           (widget (g:object gtk:widget))
                           (x :double)
                           (y :double))))