#+ccl とか #+clisp というのを使用すればできるようだ。以下のような感じ。 (defun open-socket-server () (make-socket :connect :passive :reuse-address t :local-port 7001)) (defun open-echo-server () #+CCL (let ((server (open-socket-server))) (…