常见的 Lisp 处理结构按顺序排列

Question

是否有解决方法可以像LET*一样按顺序处理结构体插槽绑定，以便以后的插槽分配可见？

例如，在下文中，我希望c对d可见。

(defstruct (my-struct (:constructor cons-struct (a b)))
(c (* a b))
(d c))

我怎样才能得到这种效果？

Answer 1

你已经在使用boa 构造函数了。 您可以使用其boa lambda 列表按顺序执行操作：

(defstruct (my-struct (:constructor cons-struct (a b
&aux
(c (* a b))
(d c))))
c
d)