Strip control codes and extended characters from a string: Difference between revisions

Content added Content deleted
Line 587:
string)))
 
(defvar *the-string* (coerceformat '(#\Hnil #\e #\l #\l #\o"Hello~aWørld~a" #\Page #\W #\ø #\r #\l #\d) 'stringNul))
 
(format t "Without controls: ~a~%" (strip-special-chars *the-string*))