anchor.diff:    (setf *last-fps-message-time* (sdl2:get-ticks))
   
     ;; Init snake
  -  (init-object *snake*))
  +  (init-snake *snake*))
   
   (defun update-fps ()
     (incf *frame-count*)
  
positive.code: 
  (defun update (delta-t)
    (if *running*
        (update-object *snake* delta-t))
    (update-fps)
    
    ;; Change angle
  
negative.code: 
  (defun draw()
    (gl:clear :color-buffer)
    (draw-snake *snake*)
    (sdl2:gl-swap-window *window*))
  
  (defun main-loop ()
  