Controls how escaping is done when symbols are printed.
system
nil
The variable *print-symbols-using-bars*
controls how escaping is done when symbols are printed.
When the value is true, printing symbols that must be escaped (for example, those with names containing the colon character :
) is done using the bar character |
instead of the backslash character \
in cases when the readtable case and *print-case* are both :upcase
or both :downcase
.
CL-USER 1 > readtable-case *readtable* :UPCASE CL-USER 2 > (let ((sys:*print-symbols-using-bars* t) (*print-case* :upcase)) (print (intern "FOO:BAR")) (values)) |FOO:BAR| CL-USER 3 > (let ((sys:*print-symbols-using-bars* t) (*print-case* :downcase)) (print (intern "FOO:BAR")) (values)) foo\:bar
LispWorks® User Guide and Reference Manual - 01 Dec 2021 19:31:02