我有一个表达式列表,我想在宏中按顺序计算这些表达式并返回最后一个表达式的值。我已经尝试过这个,但编译器不喜欢它:
(defmacro foo lst-of-exprs
',@lst-of-exprs)
和
(defmacro foo lst-of-exprs
'(progn ,@(lst-of-exprs))
有没有办法在不使用 do 循环的情况下做到这一点?
你想要
(defmacro foo lst-of-exprs
`(progn ,@lst-of-exprs))
尽管实际上这只是定义progn
本身的同义词。