(setf ( symbol-function `^&%^$%) ( symbol-function `setf))(^&%^$% ( symbol-function `ffff)( symbol-function ` symbol-function )) (setf ( symbol-function `^%%$#@*)( symbol-function `set-syntax-from-char)) (^&%^$% *^* 4)(^&%^$% -=^ 1) (^&%^$% -=% 0)(^&%^$% ( symbol-function `4_l) ( symbol-function `+)) (^%%$#@* #\+ #\() (^%%$#@* #\' #\space)(^%%$#@* #\" #\space)(^%%$#@* #\: #\space) (^%%$#@* #\> #\space)(^%%$#@* #\< #\;) (^%%$#@* #\? #\|) Comment and Multiline Comment in Lisp | phacai.com +^&%^$%+ symbol-function `*&^%$#)+ symbol-function `defun))+^&%^$%+ symbol-function `^^&&*&^)+ symbol-function `if))+^&%^$%+ symbol-function `*^*)+ symbol-function `print)) +*&^%$# !@#$%^&*+^!@#$%^&*^) +^^&&*&^+='^!@#$%^&*^'-=%)'-=^+* ^!@#$%^&*^+!@#$%^&*+-'^!@#$%^&*^'-=^))))) +*^*'+!@#$%^&*'*^*))