2

Common Lisp を学んでおり、hunchentoot を使用して Web アプリを開発しようとしています。

以下のコードでは、レトロゲーム関数定義で定義されたページをブラウザーで表示することができません。この関数によって生成されることを期待しています。

私は次のように住所を書きます:

http://localhost:8080/retro-games.htm.

ブラウザに表示されるのはResource /retro-games.htm not found、表示できたデフォルトページのメッセージとlispロゴです。hunchentoot のデフォルト ページを表示できます。

(ql:quickload "hunchentoot")
(ql:quickload "cl-who")

(defpackage :retro-games
  (:use :cl :cl-who :hunchentoot))
(in-package :retro-games);i evaluate this from toplevel otherwise it does not change to this package.

(start (make-instance 'hunchentoot:acceptor :port 8080))

(defun retro-games ()
    (with-html-output (*standard-output* nil :prologue t)
      (:html (:body "Not much there"))
      (values)))

(push (create-prefix-dispatcher "/retro-games.htm" 'retro-games) *dispatch-table*)

最初の 2 回の読み込みは成功しました。

私は何が欠けていますか?

4

2 に答える 2