История изменений
Исправление monk, (текущая версия) :
А во всех остальных достаточно сделать (setf (readtable-case *readtable*) :preserve) http://www.lispworks.com/documentation/lw51/CLHS/Body/23_aba.htm
Исходная версия monk, :
А во всех остальных достаточно сделать (setf (readtable-case *readtable*) readtable-case) http://www.lispworks.com/documentation/lw51/CLHS/Body/23_aba.htm