Das Erhalten von variablem foo ist ungebunden, wenn Sie versuchen, ein schnelles Projekt-Tutorial zu verwenden

Question

Ich habe die Anweisungen hier befolgt: http://xach.livejournal.com/278047.html und brachte sie zur Arbeit.Ich habe den Projekttest aufgerufen, daher habe ich eine test.lisp-Datei, die wie folgt aussieht:

;;;; test.lisp

(in-package #:test)

;;; "test" goes here. Hacks and glory await!

(defun foo ()
    (format t "hello from EMAIL-DB package~%"))

Wenn ich starte (ql: quickload "test"), erhalte ich: The variable FOO is unbound. Wenn ich die Zeile (in-package #: test) auskommentiere, ist foo beim Laden nicht mehr ungebunden.Was mir sagt, dass die Funktion foo syntaktisch in Ordnung ist.

Was mache ich falsch?Warum ist foo bei Verwendung ungebunden (ql: quickload "test")?

Hier ist meine Paketdatei:

;;;; package.lisp

(defpackage #:test
  (:use #:hunchentoot))

Und meine test.asd-Datei:

;;;; test.asd

(asdf:defsystem #:test
  :serial t
  :depends-on (#:hunchentoot
               #:cl-who
               #:postmodern)
  :components ((:file "package")
               (:file "test")))

Answer 1

Ihr Testpaket verwendet das CL-Paket nicht, daher lautet Ihr DEFUN TEST :: DEFUN (nicht CL: DEFUN).Es gibt keine Makrodefinition für TEST :: DEFUN, daher fährt das System mit der Auswertung mit fort Funktionsaufrufregeln, die jedes Unterformular der Reihe nach auswerten sollen, wenden die Funktion dann auf die Werte der Argumente an.Das erste Unterformular ist TEST :: FOO, bei dem es sich um eine Suche nach einer Variablen handelt. In Ihrem Bild befindet sich keine Variable wie TEST :: FOO.