cl-gtk2, gtk-main-quit

gtk+ так устроен, что gtk-main-quit не закрывает открытые окна (т.к. обычно gtk+-приложения после gtk-main-quit живут недолго, и X-сервер сам их закрывает). То есть, перед gtk-main-quit надо пройтись по всем окнам (gtk:list-toplevel-windows), и закрыть их.

(gtk:list-toplevel-windows) в только что обновлённом с помощью asdf cl-gtk2 нету. И как закрыть окна? gtk_widget_destroy также нет

Прошу прощения, писал по памяти. Вот так вот:

(loop
  for w in (gtk:gtk-window-list-toplevels)
  do (gtk:object-destroy w))

спасибо, так работает.

можно вопрос не совсем по топику?) Нужна область, в которой можно отрисовывать, перетаскивать графические элементы, для этого есть какие-то средства в gtk или можно как-то вставить фрейм с cl-opengl? Вроде один товарищ с этого форума использовал подобную вещь в своём cad-е, но я так и не нашёл, где он выкладывает свои сорцы

В самом gtk или cl-gtk2 такого нет (можно реализовать вручную через drawing-area). Есть библиотеки вроде GooCanvas, GnomeCanvas, Clutter, которые можно использовать.

сенкс, а есть что-то с биндингами для cl?

просто нашёл нечто такое - http://www.frank-buss.de/lisp/canvas.html, но оно 2005 года и «currently only tested on LispWorks for Windows, but should work on Allegro Common Lisp for Windows, too»

и забыл - хотелось бы иметь возможность сохранять drawing-elements в простом формате понятном drawing-system, возможно такое есть из коробки в каком нибудь canvas? типа как набор примитивов и сохранять в xml, хотя если нет, то вроде не сложно самому такое сделать, но было бы приятно