Strip control codes and extended characters from a string: Difference between revisions
Content deleted Content added
Line 587: | Line 587: | ||
string))) |
string))) |
||
(defvar *the-string* ( |
(defvar *the-string* (format nil "Hello~aWørld~a" #\Page #\Nul)) |
||
(format t "Without controls: ~a~%" (strip-special-chars *the-string*)) |
(format t "Without controls: ~a~%" (strip-special-chars *the-string*)) |