anchor.diff:             ~s"
             (body c)))
   
  -(defmethod cleavir-i18n:report-condition
  -    ((c function-body-must-be-proper-list) stream (language cleavir-i18n:english))
  +(defmethod acclimation:report-condition
  +    ((c function-body-must-be-proper-list) stream (language acclimation:english))
     (format stream
   	  "The BODY of a function must be a proper list.
              But the following was found instead:~@
  
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: ;;;
  ;;;  Lambda list conditions.
  
  (defmethod acclimation:report-condition
      ((c lambda-list-must-be-list) stream (language acclimation:english))
    (format stream
  	  "A lambda list must be a list.~@
             But the following was found instead:~@
             ~s"
  	  (code c)))
  
  (defmethod acclimation:report-condition
      ((c lambda-list-must-not-be-circular) stream (language acclimation:english))
    (format stream
  	  "A lambda list must not be a circular list.~@
             But the following was found instead:~@
             ~s"
  	  (code c)))
  
  (defmethod acclimation:report-condition
      ((c lambda-list-must-be-proper-list) stream (language acclimation:english))
    (format stream
  	  "This lambda list must be a proper list.~@
             But the following was found instead:~@
             ~s"
  	  (code c)))
  
  (defmethod acclimation:report-condition
      ((c lambda-list-keyword-not-allowed) stream (language acclimation:english))
    (format stream
  	  "Lambda list keyword ~s not allowed in this type of lambda list:~@
             ~s"
  	  (lambda-list-keyword c)
  	  (code c)))
  
  (defmethod acclimation:report-condition
      ((c suspect-lambda-list-keyword) stream (language acclimation:english))
    (format stream
  	  "Suspect lambda list keyword ~s will be treated as an ordinary symbol.~@
             In this lambda list:~@
  