1 2 3 4 5
(defun help () (format t "would you mind reading the fucking manual pages?")) (with-output-to-string (*standard-output*) (help))