anchor.diff:             ~s"
             (code c)))
   
  -(defmethod cleavir-i18n:report-condition
  -    ((c malformed-defgeneric-optional) stream (language cleavir-i18n:english))
  +(defmethod acclimation:report-condition
  +    ((c malformed-defgeneric-optional) stream (language acclimation:english))
     (format stream
   	  "In this type of lambda list, an item following the &optional~@
              lambda-list keyword must have one of the following forms:~@
  
positive.code: ;;;
  ;;;  Conditions for forms with BODY.
  
  (defmethod cleavir-i18n:report-condition
      ((c ordinary-body-must-be-proper-list) stream (language cleavir-i18n:english))
    (format stream
  	  "The BODY of a form such as LET, LET*, FLET, LABELS,~@
             or LOCALLY, must be a proper list.
  
negative.code:            ~s"
            (code c)))
  
  (defmethod acclimation:report-condition
      ((c malformed-destructuring-key) stream (language acclimation:english))
    (format stream
  	  "In this type of lambda list, an item following the &key~@
             lambda-list keyword must have one of the following forms:~@
  