lisp - Hunchentoot を開始するにはどうすればよいですか?

Question

プロジェクトで Hunchentoot を開始するにはどうすればよいですか? Edi Weitz のガイドに目を通したところ、インストール後まですべてがスムーズに進みました。リストされたチュートリアルは、実際のサーバーの使用状況に基づいて壊れているか、ざっと見ただけです。

asdf ファイルがあり、quicklisp で依存関係をインストールし、ディスパッチ テーブルをセットアップしました。Hunchentoot をこのようなもので動作させるにはどうすればよいですか?

Answer 1

startのインスタンスで呼び出しますacceptor。

easy-handlerhunchentoot に付属する基本的なメカニズムを使用すると、 easy-acceptor.

サーバーを起動および停止するためのメカニズムを用意する必要があります。それは次のようになります。

(defvar *acceptor* nil)

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

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