X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela.lisp;h=cc875b4c8109fb082ed818ed53757ca90f9fe3c0;hb=6b6a4339ce465b8fed0fd017c981d0b5953a5175;hp=299ab90b9a21b328337bde69d2a8b598a5742b4d;hpb=bc04e12cf3c193c3b5620f3b6e0ded852f221fb8;p=gacela.git diff --git a/gacela.lisp b/gacela.lisp index 299ab90..cc875b4 100644 --- a/gacela.lisp +++ b/gacela.lisp @@ -285,7 +285,9 @@ (do () ((quit?)) (glClear (+ GL_COLOR_BUFFER_BIT GL_DEPTH_BUFFER_BIT)) (to-origin) + (refresh-visible-boxes) (when (functionp game-code) (funcall game-code)) + (render-boxes) (SDL_GL_SwapBuffers) (delay-frame) (init-frame-time) @@ -304,7 +306,8 @@ (free-all-resources) (quit-audio) (quit-video-mode) - (quit-all-mobs) +; (quit-all-mobs) + (quit-all-boxes) ; (clear-events) ; (quit-events) (quit-sdl))