anchor.diff:  (defun load-game(void)
     (progn
       (setf player-dir (vec 0 1))
  +    (setf boosters-eaten 0)
       (setf new-pos (vec 0 0))
       (setf cam-pos (vec 0 50))
  -    ;(setf cam-size (vec 50 50))
       (setf circles (cast null (ptr vec3)))
       (setf circle-cnt 0)
  -    (setf speed 0.10)
  +    (setf speed 0.096)
   
       (clear-list+ grass-rects grass-rect-cnt)
       (add-to-list+ grass-rects grass-rect-cnt (make-rect (vec -500 -500) (vec 1000 500)))
  -
  -    
       (clear-list+ circles circle-cnt)
       (add-to-list+ circles circle-cnt (vec 8 60 18))
       (add-to-list+ circles circle-cnt (vec -10 95 10))
  
positive.code: 
      (usleep 10000)
      )))
  (launch (addrof start-repl))
  (run-game)
  
  
negative.code: (defvar cam-size (vec 50 50))
  (defvar circles (cast null (ptr vec3)))
  (defvar circle-cnt 0)
  (defvar boosters (cast null (ptr vec3)))
  (defvar booster-cnt 0)
  (defvar speed 1.0)
  (defvar boosters-eaten 0)
  (defun pt-dist(f64 (a vec2) (b vec2))
    (vec2-length (- a b)))
  
  