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:       (setf (gethash "one" h2) "yat")
        (setf (gethash "two" h1) "yi")
        (setf (gethash "two" h2) "yi")
        (true-or-false? ___ (eq h1 h2))
        (true-or-false? ___ (equal h1 h2))
        (true-or-false? ___ (equalp h1 h2))))
  
  
  (define-test test-changing-hash-tables
  
negative.code:     (setf (gethash "one" hash-table-default) "uno")
  
      "count how many unique key-value pairs in each"
      (assert-equal 2 (hash-table-count hash-table-eq))
      (assert-equal 1 (hash-table-count hash-table-equal))
      (assert-equal 2 (hash-table-count hash-table-default))))
  
  
  (define-test test-hash-table-equality
  