Emacs 和 Slime 启动脚本

Question

每次我开始工作时，我启动 Emacs，M-x cd 到工作目录，M-x slime 启动 Slime，然后在 slime repl 中运行 (ql:quickload 'myproject)，（或者，加载系统 myproject）后跟，+p myproject 切换repl中的当前包。 最后，我在 repl 中运行 call a (start-server) 来启动我的 Web 服务器。

我希望这一切都只是一个 Emacs 按键或命令。我不得不问这个很尴尬，因为它都是 lisp，但我无法完全弄清楚 Emacs 和 Slime 之间的相互作用。然而，作为一名程序员，我觉得我应该将所有繁琐的流程自动化——而且我预见到还会增加几个步骤。

我想棘手的部分是发送 slime 命令，然后在发送下一个命令之前等待 quicklisp 完成。

任何指针将不胜感激！

编辑：感谢 Svante 的 C-c ~ 提示，这对我来说是个新闻

Answer 1

在 Emacs 方面，您可以将键绑定到命令，而不是使用附加参数调用 slime：

(defun my-lisp ()
  (interactive)
  (slime (concat "sbcl --load " <path-to-your-lisp-script>)))

在你的 Lisp 脚本中，例如：

(ql:quickload :my-system)
(in-package :my-package)
(start-server)