anchor.diff:              (loop for letter in letters collect letter))
              (loop-result-on
               (loop for letter on letters collect letter)))
  -      (assert-equal loop-result-in ____)
  -      (assert-equal loop-result-on ____ )))
  +      (assert-equal loop-result-in '(:a :b :c))
  +      (assert-equal loop-result-on '((:a :b :c) (:b :c) (:c)))))
   
   
   (define-test test-loop-in-skip-by
  
positive.code:             (loop for k being the hash-keys in books-to-heros
                    using (hash-value v)
                    collect (list k v))))
        (assert-equal ____ (length pairs-in-table))
        (true-or-false? ____ (find '("The Hobbit" "Bilbo") pairs-in-table :test #'equal))))
  
  
  (define-test test-value-accumulation-forms
  
negative.code:              (loop for letter in letters
                     for i from 0 to 1000 by 5
                     collect (list i letter))))
        (assert-equal loop-result '((0 :a) (5 :b) (10 :c) (15 :d)))))
  
  
  (define-test test-counting-backwards
      (let ((loop-result
               (loop for i from 10 downto -10 by 5
                     collect i )))
        (assert-equal loop-result '(10 5 0 -5 -10))))
  
  
  (define-test test-loop-in-vs-loop-on
  