anchor.diff:  (defun update (delta-t)
     (if *running*
         (update-snake *snake* delta-t))
  -  (update-fps)
  -  
  -  ;; Change angle
  -  ;;(incf *angle* 0.5)
  -  ;;(if (> *angle* 360.0)
  -  ;;    (decf *angle* 360.0))
  -  )
  +  (update-fps))
   
   (defun draw()
     (gl:clear :color-buffer)
  
positive.code: 		 (loop for i in *next-frame-hook*
  		    do (funcall i))
  		 (setf *next-frame-hook* nil))))
        (sdl2:gl-delete-context *gl-context*)
        (sdl2:destroy-window *window*))))
  
  
negative.code: (defparameter *gl-context* nil)
  (defparameter *window-width* 960)
  (defparameter *window-height* 540)
  (defparameter *game-controllers* nil)
  (defparameter *angle* 0.0)
  (defparameter *running* t)
  
  