anchor.diff:             ~s was found."
   	  (type-error-datum c)))
   
  -(defmethod report-condition ((c slot-documentation-option-must-be-string)
  +(defmethod cleavir-i18n:report-condition ((c slot-documentation-option-must-be-string)
   			     stream
   			     (language (eql 'en-us)))
     (format stream
  
positive.code:            ~s"
  	  (code c)))
  
  (defmethod report-condition
      ((c empty-body) stream (language (eql 'en-us)))
    (format stream
  	  "The body of this form is empty:~@
             ~s"
  	  (code c)))
  
  (defmethod report-condition
      ((c numeric-catch-tag) stream (language (eql 'en-us)))
    (format stream
  	  "CATCH tags are compared with EQ so using a numeric~@
  
negative.code: 	  (lambda-list-keyword c)
  	  (code c)))
  
  (defmethod cleavir-i18n:report-condition
      ((c incorrect-keyword-order) stream (language (eql 'en-us)))
    (format stream
  	  "Incorrect lambda list keyword order.~@
  