(defun equal (x y)
#!+sb-doc
- "Returns T if X and Y are EQL or if they are structured components
+ "Return T if X and Y are EQL or if they are structured components
whose elements are EQUAL. Strings and bit-vectors are EQUAL if they
are the same length and have identical components. Other arrays must be
EQ to be EQUAL."