gtk:window-destroy (window)

window -- a gtk:window widget to destroy

Removes window from the list of toplevels and frees all resources associated with the window. Signal handler for a Cancel button that gets the toplevel window and destroys it to quit the window.

(g:signal-connect cancelbutton "clicked"
                  (lambda (button)
                    (let ((toplevel (gtk:widget-root button)))
                      (gtk:window-destroy toplevel))))