;; 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