anchor.diff:  			hash-key
   			of
   			hash-table-form
  -			using)
  -		 (declare (ignore being each hash-key of))
  +			using
  +			other)
  +		 (declare (ignore being each hash-key of using))
   		 (make-instance 'for-as-hash-key
   		   :var-spec var-spec
   		   :type-spec type-spec
   		   :hash-table-form hash-table-form
  -		   :other-var-spec using))
  +		   :other-var-spec other))
   	       (singleton #'identity (constantly t))
   	       'optional-type-spec-parser
   	       (keyword-parser 'being)
  
positive.code: 	       'hash-value-parser
  	       'in-of-parser
  	       (singleton #'identity (constantly t))
  	       'hash-key-other-parser))
  
  (define-parser hash-value-no-using-parser
  
negative.code: 	       'hash-key-parser
  	       'in-of-parser
  	       (singleton #'identity (constantly t))
  	       (keyword-parser 'using)
  	       'hash-value-other-parser))
  
  (define-parser hash-key-no-using-parser
  