anchor.diff:  
   (define-test test-key-params-can-have-defaults
       "key parameters can have defaults also"
  -   (assert-equal (func-key-params-can-have-defaults) ____)
  -   (assert-equal (func-key-params-can-have-defaults :a 3 :b 4) ___)
  -   (assert-equal (func-key-params-can-have-defaults :a 11 :b 22) ___)
  -   (assert-equal (func-key-params-can-have-defaults :b 22) ___)
  +   (assert-equal (func-key-params-can-have-defaults) '(3 nil 4 nil))
  +   (assert-equal (func-key-params-can-have-defaults :a 3 :b 4) '(3 t 4 t))
  +   (assert-equal (func-key-params-can-have-defaults :a 11 :b 22) '(11 t 22 t))
  +   (assert-equal (func-key-params-can-have-defaults :b 22) '(3 nil 22 t))
      ; order is not important
  -   (assert-equal (func-key-params-can-have-defaults :b 22 :a 0) ___))
  +   (assert-equal (func-key-params-can-have-defaults :b 22 :a 0) '(0 t 22 t)))
   
   
   ;; ----
  
positive.code: 
  (define-test test-many-kinds-params
      "CL provides the programmer with more than enough rope to hang himself."
     (assert-equal (func-with-funky-parameters 1) ___)
     (assert-equal (func-with-funky-parameters 1 :b 2) ___)
     (assert-equal (func-with-funky-parameters 1 :b 2 :c 3) ___)
     (assert-equal (func-with-funky-parameters 1 :c 3 :b 2) ___))
  
  
  ;; Note that &rest parameters have to come before &key parameters.
  
negative.code:     "An illustration of how lexical closures may interact."
    (let ((tangled-funs-1 (two-funs 1))
          (tangled-funs-2 (two-funs 2)))
       (assert-equal (funcall (first tangled-funs-1)) 1)
       (funcall (second tangled-funs-1) 0)
       (assert-equal (funcall (first tangled-funs-1)) 0)
  
       (assert-equal (funcall (first tangled-funs-2)) 2)
       (funcall (second tangled-funs-2) 100)
       (assert-equal (funcall (first tangled-funs-2)) 100)))
  
  
  (define-test test-apply-function-with-apply
  