Common Lisp宏传函数返回值失效，直接传列表正常，求原因

核心差异在于Common Lisp宏与函数的执行时机完全不同：

1. 直接传字面列表的工作逻辑 #

宏是在编译阶段处理参数的，它操作的是源代码级别的S表达式（未求值的代码形式）。当你直接写(fourcalc (a plus 2 3))时，宏在编译期拿到的就是字面列表(a plus 2 3)，可以直接解构这个列表，展开成对应的加法代码(+ 2 3)，运行时执行这段代码就得到5。

2. 传函数返回列表的问题所在 #

cat-file是函数，它返回的列表是运行阶段生成的数据。但宏在编译期根本不会去执行cat-file，它拿到的参数是表达式(cat-file "test.txt")本身，而不是这个函数运行后返回的列表。如果你的fourcalc宏没有处理这种函数调用表达式的逻辑，比如尝试解构一个只有1个元素的列表（(cat-file "test.txt")），就会匹配失败，最终宏展开后的代码无法生成有效计算，运行时自然返回nil。

解决办法：用函数替代宏处理运行时数据 #

如果需要处理从文件读取的、运行时生成的列表，应该把逻辑写成函数而非宏。比如：

(defun fourcalc-func (expr)
  (destructuring-bind (op-name op a b) expr
    (case op
      (plus (+ a b))
      ; 可扩展其他运算逻辑
      )))

调用时直接传入函数返回的列表：

(fourcalc-func (cat-file "test.txt"))

这样就能在运行时先执行cat-file拿到列表，再传入函数进行计算，得到预期的5。

内容的提问来源于stack exchange，提问作者sunoko