common-lisp - 引号、列表等用时的区别

Question

我需要知道报价和列表之间的区别。例如:

cl-prompt> (equal (first (list * 1 2)) *)
T

cl-prompt> (equal (first '(* 1 2)) *)
NIL

我不明白这是什么问题。

Answer 1

当用作变量时 * 指的是最后打印到 repl 的结果。

CL-USER> (+ 4 4)
8 
CL-USER> *
8

在第一个中，两个星号都未加引号，因此它们被视为变量而不是符号(它们的值是您在该行之前评估的值)。它们是相同的变量，所以当然 EQUAL。

CL-USER> (list * 1 2)
(8 1 2)

在第二个中，第一个星号是一个带引号的符号，而第二个是一个值为 T 的变量。符号 * 不是 EQUAL 到 T，所以它返回 NIL

CL-USER> '(* 1 2)
(* 1 2)