Slime with CMUCL starts the Slime REPL in the `swank' package, and the inferior lisp in the `cl-user' package. Is there a way to get the Slime REPL also to start CMUCL in the `cl-user' package? I've tried without success
(defun nr-cmucl-init-command (port-filename coding-system) "Return a string to initialize CMUCL. This is a modified version of `slime-init-command' from `slime.el'." (let ((loader (if (file-name-absolute-p slime-backend) slime-backend (concat slime-path slime-backend))) (encoding (slime-coding-system-cl-name coding-system))) (format "%S\n\n" `(progn (load ,(expand-file-name loader) :verbose t) (funcall (read-from-string "swank-loader:init")) (funcall (read-from-string "swank:start-server") ,port-filename :coding-system ,encoding) (in-package "CL-USER")))))
(setq slime-lisp-implementations '((cmucl ("/opt/bin/lisp") :init nr-cmucl-init-command)))
Thanks, Raghavendra.