(cond ((not (quit?))
(glClear (+ GL_COLOR_BUFFER_BIT GL_DEPTH_BUFFER_BIT))
(to-origin)
- (refresh-visible-boxes)
+ (refresh-active-objects)
(when (functionp game-code) (funcall game-code))
- (render-boxes)
+ (render-objects)
(SDL_GL_SwapBuffers)
(delay-frame))))
(setq running nil))
(quit-audio)
(quit-video-mode)
; (quit-all-mobs)
- (quit-all-boxes)
+ (kill-all-objects)
; (clear-events)
; (quit-events)
(quit-sdl))