;; The following examples assume the readtable case of *readtable* ;; and *print-case* are both :upcase. (eq 'abc 'ABC) true (eq 'abc '|ABC|) true (eq 'abc 'a|B|c) true (eq 'abc '|abc|) false