princ-to-string объект ⇒ строка
Создаёт строку, состоящую из печатного представления объекта. Аналогично работает вызов
(format nil "~a" объект)
(princ-to-string pi) ; число "3.141592653589793" (princ-to-string 'foo) ; символ "FOO" (princ-to-string #\a) ; знак "a" (princ-to-string "abc") ; строка "abc" (format nil "число ~a, символ ~a, знак ~a, строка ~a" pi 'foo #\a "abc") "число 3.141592653589793, символ FOO, знак a, строка abc"