anchor.diff:        (setf (gethash "two" expected) "zwei")
   
         (setf (gethash "one" babel-fish) "eins")
  -      (setf (gethash "two" babel-fish) ____)
  +      (setf (gethash "two" babel-fish) "zwei")
   
         (assert-true (equalp babel-fish expected))))
   
  
positive.code:     "make hash table with make-hash-table"
    (let ((my-hash-table))
      (setf my-hash-table (make-hash-table))
      (true-or-false? ___ (typep my-hash-table 'hash-table))
      (true-or-false? ___  (hash-table-p my-hash-table))
      (true-or-false? ___  (hash-table-p (make-array '(3 3 3))))
      (assert-equal ___ (hash-table-count my-hash-table))))
  
  
  (define-test test-hash-table-access
  
negative.code:       (setf value-and-exists (multiple-value-list (gethash "Obama" prev-pres)))
        (assert-equal value-and-exists '("Bush" t))
        (setf value-and-exists (multiple-value-list (gethash "Lincoln" prev-pres)))
        (assert-equal value-and-exists '("Buchanan" t))
        (setf value-and-exists (multiple-value-list (gethash "Washington" prev-pres)))
        (assert-equal value-and-exists '(nil t))
        (setf value-and-exists (multiple-value-list (gethash "Franklin" prev-pres)))
        (assert-equal value-and-exists '(nil nil))))
  
  
  (define-test test-make-your-own-hash-table
      "make a hash table that meets the following conditions"
    (let ((colors (make-hash-table :test #'equalp))
          (values (make-hash-table)))
  
      (setf (gethash "blue" colors) '(0 0 1))
      (setf (gethash "green" colors) '(0 1 0))
      (setf (gethash "red" colors) '(1 0 0))
      (setf (gethash "white" colors) '(1 1 1))
  
      (assert-equal (hash-table-count colors) 4)
      (setf values (list (gethash "blue" colors)
  