The ':sescape' keyword is an entry used in the *readtable* system variable that contains XLISP's data structures relating to the processing of characters from the user [or files] and read-macro expansions. The existance of the ':sescape' keyword means that the specified character is to be used as a single escape character. The system defines that the the backslash character '\' is the only defined ':sescape' character.
;; define a function to look in a table ;; and print out any :SESCAPE character (defun look-at (table) (dotimes (ch 127) (prog ((entry (aref table ch))) (case entry (:SESCAPE (princ (int-char ch))) (t nil)))) (terpri)) (look-at *readtable*) ; prints \
Caution: If you experiment with *readtable*, it is useful to save the old value in a variable, so that you can restore the system state.
See the
:sescape
keyword in the