当CL程序作为shell脚本调用时如何使用quicklisp？

Question

我目前有一个 Common Lisp 的小程序，我想将其作为 shell 脚本运行。我正在使用 SBCL，并且对此非常满意，因此我更愿意留在这个平台上。 :)

我知道 --script 选项，它可以完美地工作，除了 (ql:quickload) 形式。

我的程序使用 CL-FAD，它通过 ql:quickload 加载（我想我应该提到它是来自 quicklisp 的包加载函数。当脚本运行到评估

(ql:quickload :cl-fad)

表单时，它会出现下一个错误：

package "QL" not found

程序被打包在单个源文件中，该文件具有以下标头：

(defpackage :my-package
  (:use :common-lisp)
  (:export :my-main-method))

它是简单的自动化可执行文件，因此我决定（可能是错误的）不编写任何 ASDF 系统。它导出应该在没有任何参数的情况下运行的单个函数。

对于这个程序，我目前正在尝试编写启动器脚本，这就是我所关注的：

#!/usr/bin/sbcl --script
(load "my-program.lisp")
(in-package :my-package)
(my-main-method)

这三行（不包括 shebang）是我想要自动化的。正如我在文档中读到的，带有这个 shebang 的脚本可以被称为简单的 ./script.lisp，它确实做到了这一点......并出现了前面描述的错误。

我需要在启动器中添加什么才能正确加载 :cl-fad ？文档指出，使用 --script 选项 SBCL 不会加载任何初始化文件，所以我真的需要复制粘贴这些行

#-quicklisp
(let ((quicklisp-init (merge-pathnames "systems/quicklisp/setup.lisp"
                                       (user-homedir-pathname))))
  (when (probe-file quicklisp-init)
    (load quicklisp-init)))

（其中 ql:add-to-init-file 添加到 .sbclrc)，到我的启动器脚本？ 也许我的程序设置中有一些深层的架构缺陷？

是的，当我在 sbcl 本身的 REPL 中输入尝试自动化的行时，程序按预期运行。

Answer 1

你做的一切都是正确的。

基本上，在使用 quicklisp 之前，您需要加载它（目前，它未与 SBCL 捆绑在一起，尽管将来可能会发生变化）。有多种方法可以做到这一点。例如，您可以使用 Quicklisp init: 加载 .sbclrc ，

#!/usr/bin/sbcl --script
(load ".sbclrc")
(load "my-program.lisp")
(in-package :my-package)
(my-main-method)

或者将这些行粘贴到脚本中，就像您所建议的那样。

Answer 2

创建核心映像的专用版本是一个不错的选择。您可以：

1. 在新映像中加载 quicklisp 和 sb-ext:save-lisp-and-die。您编写一个名为 qlsbcl 的 shell/bat 脚本，如下所示：

   sbcl --core ; “$@”
   

2. grab clbuild2 at http://gitorious.org/clbuild2 并运行 clbuild lisp。如果您的 quicklisp 不在公共位置 ~/quicklisp (https://gist.github.com/1485836) 或者如果您使用 ASDF2 （https://gist.github.com/1621825）。通过这样做，clbuild 使用 quicklisp、ASDF 以及您可以在 conf.lisp 中添加的任何内容创建一个新核心。现在 shebang 可能看起来像这样：

   #!/usr/bin/env sbcl --noinform --core /sbcl-base.core --script
   

clbuild 的优点是您可以轻松地从 shell 为 sbcl（默认情况下）或任何其他现代创建和管理 core 和 Quicklisp 安装类似 ccl64 的 CL 实现。混合使用两种技术（脚本和 clbuild）将解决您的问题。