尝试使用快速项目教程来获取变量foo是不受约束的

Question

我已按照此处的说明进行操作： http://xach.livejournal.com/278047.html 并使他们工作。我将其称为项目测试，所以我有一个类似于以下内容的test.lisp文件： 通用标签

当我运行（ql：quickload“ test”）时，我得到：The variable FOO is unbound. 如果我注释掉（in-package＃：test）行，那么在加载foo时，foo不再是未绑定的。告诉我foo函数在语法上是可以的。

我在做什么错？为什么使用foo时不绑定（ql：quickload“ test'）？

这是我的包裹文件： 通用标签

还有我的test.asd文件： 通用标签

Answer 1

您的测试程序包不使用CL程序包，因此您的DEFUN是TEST :: DEFUN（不是CL：DEFUN）。TEST :: DEFUN没有宏定义，因此系统继续使用 函数调用规则，这些规则将按顺序评估每个子表单，然后将函数应用于参数的值。第一个子窗体是TEST :: FOO，它是一个变量的查找-并且图像中没有TEST :: FOO这样的变量。