我正在试图重写《Lisp之地》中的巫师游戏 http://landoflisp.com/wizards_game.lisp
请注意,这是一段关于IT技术的文本,需要翻译成通俗易懂的中文。(def *nodes* {:living-room "you are in the living-room. a wizard is snoring loudly on the couch."
:garden "you are in a beautiful garden. there is a well in front of you."
:attic "you are in the attic. there is a giant welding torch in the corner."})
(def *edges* {:living-room '((garden west door) (attic upstairs ladder))
:garden '(living-room east door)
:attic '(living-room downstairs ladder)})
(defn describe-location [location nodes]
(nodes location))
(defn describe-path-raw [edge]
`(there is a ~(last edge) going ~(second edge) from here.))
(defn describe-path [edge]
(map #(symbol (name %)) (describe-path-raw edge)))
(defn describe-paths [location edges]
(apply concat (map describe-path-raw (location edges))))
当尝试时:
(println (describe-paths :attic *edges*))
我遇到了这个异常:
主线程中的异常: java.lang.RuntimeException: java.lang.IllegalArgumentException: 不知道如何从clojure.lang.Symbol创建ISeq (wizard-game.clj:0)
我还没有Lisp的眼光,我做错了什么?