Hunchentootを起動する - lisp-cookbook-ja/common-lisp GitHub Wiki

Hunchentoot Webサーバ

acceptorクラスのインスタンスを作り、startを呼ぶことで、ウェブサーバとしての動作を開始します。

;; ポート80のacceptor
(defvar *port80-acceptor* (make-instance 'hunchentoot:acceptor))

;; ポート8080のacceptor
(defvar *port8080-acceptor* (make-instance 'hunchentoot:acceptor :port 8080))

;; ポート80への接続の受付を開始する
(hunchentoot:start *port80-acceptor*)

;; ポート8080への接続の受付を開始する
(hunchentoot:start *port8080-acceptor*)

このように、複数のポートへの接続を、同時に受け持たせることもできます。