Function: %ENABLE-XML-SYNTAX

Source

(defun %enable-xml-syntax ()
  (set-macro-character *xml-reader-open-char* #'xml-reader-open nil *readtable*))