anchor.diff:            (my-return))
         (dolist (x my-list my-return)
           (push (* x x) my-return))
  -      (assert-equal ____ my-return)))
  +      (assert-equal '(16 9 4 1) my-return)))
   
   
   (define-test test-dotimes
  
positive.code:       (loop
          (incf loop-counter)
          (if (>= loop-counter 100) (return loop-counter)))
        (assert-equal ___ loop-counter)))
  
  
  (define-test test-mapcar
      "mapcar takes a list an a function.  It returns a new list
       with the function applied to each element of the input"
    (let ((mc-result (mapcar #'evenp '(1 2 3 4 5))))
      (assert-equal mc-result ____)))
  
  
  ;; ----
  
negative.code:   (assert-equal (vowels-to-xs "Astronomy") "xstrxnxmy")
    (let* ((subjects '("Astronomy" "Biology" "Chemistry" "Linguistics"))
           (mc-result (mapcar #'vowels-to-xs subjects)))
      (assert-equal mc-result '("xstrxnxmy" "Bxxlxgy" "Chxmxstry" "Lxngxxstxcs"))))
  
  
  ;; ----
  
  (define-test test-mapcar-with-lambda
      (let ((mc-result (mapcar #'(lambda (x) (mod x 10)) '(21 152 403 14))))
        (assert-equal mc-result '(1 2 3 4))))
  