lisp - 如何启动 Hunchentoot？

Question

如何在项目上启动 Hunchentoot？我查看了 Edi Weitz 的指南，一切顺利，直到安装完成。列出的教程要么被破坏，要么略过实际的服务器使用情况。

我有我的 asdf 文件，用 quicklisp 安装了依赖项，并设置了一个调度表。我如何让 Hunchentoot 使用这些东西？

Answer 1

为了更新，我改进了 Svante 的回答:

(defun start-server ()
  (stop-server)
  (start (setf *acceptor*
               (make-instance 'easy-acceptor
                              :port 4242))))

(defun stop-server ()
  (when *acceptor*
    (when started-p *acceptor*
     (stop *acceptor*))))

在启动服务器之前，接受器 为零。服务器启动后(即使随后已停止)它不再为零。 started-p 测试检查是否启动了初始化的 easy-acceptor。如果您尝试停止一个已经停止的接受器，您会收到一个错误。