multithreading - lisp 图像中基于 hunchentoot 的应用程序(来自 buildapp)立即返回

Question

所以我有一个基于 hunchentoot 使用 restas 的应用程序。

在某些时候，我有以下功能:

(defun main (args)
  (declare (ignore args))
  (set-config)
  (restas:start '#:spa :port 8080))

(set-config) 设置一些与数据库相关的值。

无论如何，我会按以下方式使用 buildapp:

buildapp --output dist/spa --load-system spa --asdf-tree ~/quicklisp/ --entry spa::main --compress-core

效果很好。 (set-config) 函数需要一个 config.json 文件存在，当文件不存在时它确实不起作用，所以我知道确保应用程序已正确编译。

然而，当我运行生成的二进制文件时，应用程序立即返回。这意味着 HTTP 服务器不会保持运行状态。

我猜测这与 hunchentoot 产生一个新线程的事实有关，但它不应该停止进程，对吗？

此外，我不想不使用线程，即我希望每个请求都是一个单独的线程。

所以...我不确定为什么它会立即返回。为什么？以及如何解决？

Answer 1

我猜你必须进入一个主循环来保持程序运行。 http://www.xach.com/lisp/buildapp/ 处的示例使用特定于 SBCL 的 (sb-impl::toplevel-repl nil)。