SDL2 && CommonLisp

У тебя у :quit скобки уехали вниз. Надо так:

:quit () ...
:idle () ...

Могу высказать предположения:

1) Повторный вызов sdl2:init что-нибудь ломает

2) SLIME может выполнять команды в разных нитях (потоках), а SDL2 - не-thread-safe (https://wiki.libsdl.org/FAQDevelopment#Can_I_call_SDL_video_functions_from_mu...).

Проверил,не из за sdl2:init. А как второе можно проверить?

Я пишу не на перволиспе,успокойся

Расходимся, у него анонимус в игноре.

Ты ошибся.

Да, значит со зрением проблемы.

ПРоверить можно, напечатав из твоего цикла что-нибудь типа:

(print sb-thread:*current-thread*)

НАпечатается что-то типа

#<SB-THREAD:THREAD "repl-thread" RUNNING {100A250033}>

Цифры - это вроде как адрес. Адрес может поменяться при сборке мусора. repl-thread в SLIMe один, а worker-thread-ов может быть много.

Чтобы быть уверенным, заведи переменную, присвой в неё тред при первом запуске, а при последующем сравни со старым значением.

Под CCL пробовал?

Тебе ответ дали в первом комменте. Лисперы все такие тупые?

Адрес во время выполнения программы не меняется,так же не меняется при перезапуске функции. Так же,значение переменной остается тем же,что я и присвоил в 1 запуске.Проверил в emacs/sbcl (cli)

CCL сейчас попробую

У CCL такая же проблема,только он мне почему то backtrace не хочет давать.Как поток узнать в нем,я не понял

Идиот, у тебя из-за скобок макрос неправильно раскрывается и косячит состояние.

Состояние бывает только у пидоров!

Если адрес объекта тред не меняется, то у тебя один и тот же тред в обоих случаях. Хотя я смотрю, там какие-то манипуляции с тредами в самой лисповой библиотеке происходят. Т.е., то, что у тебя один тред сванка, может ни о чём не говорить.

Ты пробовал примеры запускать из исходников? Работают они?

https://github.com/lispgames/cl-sdl2/blob/master/examples/renderer.lisp

У тебя макрос принимает destroy-render за параметер :quit:

(:quit (sdl2:destroy-renderer render)

Офигеть лисперы аутисты. Шел второй день.

Даун который сидит из под анонимуса,убейся и не вызывай у меня больше facepalm'ы

Скопипастил пример,все работает.Видимо sdl2:with-init надо юзать,иначе деструктор не вызывается (вроде так он работает,да?)

Да,из за sdl2:with-init.Думал обычный init можно с помощью sdl:quit убить.

Ну,тут я не в теме, как он работает и т.п. Это ты сам исходники посмотри. Я тут чисто методически действую, без конкретики: если оно не работает, то

а) оно действительно не работает б) оно неправильно применено

Пример нужно было запустить только лишь для того, чтобы отличить случаи (а) и (б) между собой.

На случай, если отредактирует пост, чтобы каждый мог проверить:

https://pastebin.com/rm2uebkE

Тебе в первом же комменте указали на ошибку и потом еще десять раз напомнили. Идиот, что сказать.

Ошибка была не в этом мудила,от :quit (...) ничего не зависит,пропуск нужен обязательно только в :idle () (...)

Лол, это не пропуск, это обязательный список параметров. В данном случае пустой.

А значит, как минимум, у тебя (sdl2:destroy-renderer render) просто пропадет, а, как максимум, макрос раскроется в непредсказуемую кашу.

Сделал пропуск,все равно ошибка.Сути не меняет. Работает только с with-init

Работает только с with-init

(defmacro with-init ((&rest sdl-init-flags) &body body)
  `(progn
     (init ,@sdl-init-flags)
     (unwind-protect
          (in-main-thread () ,@body)
(quit))))

Спасибо,думал это работает по другому