anchor.diff:  (declare-function RASSOC-IF-NOT ())
   (declare-function RATIONAL ())
   (declare-function RATIONALIZE ())
  -(declare-function RATIONALP ())
  +(declare-function RATIONALP (object) :result-type generalized-boolean)
   (declare-function READ-BYTE ())
   (declare-function READ-CHAR ())
   (declare-function READ-CHAR-NO-HANG ())
  
positive.code: (declare-function ARRAY-DIMENSIONS (array) :result-type (list (integer 0)))
  (declare-function ARRAY-DISPLACEMENT ())
  (declare-function ARRAY-ELEMENT-TYPE ())
  (declare-function ARRAY-HAS-FILL-POINTER-P ())
  (declare-function ARRAY-IN-BOUNDS-P ())
  (declare-function ARRAYP ())
  (declare-function ARRAY-RANK ())
  (declare-function ARRAY-ROW-MAJOR-INDEX ())
  (declare-function ARRAY-TOTAL-SIZE ())
  
negative.code: (declare-function WRITE-TO-STRING ())
  (declare-function YES-OR-NO-P ())
  (declare-function Y-OR-N-P ())
  (declare-function ZEROP (object) :result-type generalized-boolean)
  
  (declare-local-function CALL-NEXT-METHOD (&rest arguments))
  (declare-local-function NEXT-METHOD-P    ())
  