在Lisp中打印结构

Question

我希望能够在实例化时打印结构的变量，以便查看正在发生的事情。我大肆搜索这个想法，找不到任何具体的东西。

例如：

(setf object-name
      (make-the-object :obj-var value
                       :obj-var1 value))

这可能是这样的：

(setf object-name
      (make-the-object :obj-var value
                       :obj-var1 value
                       :(print obj-var1)))

以便在实例化时打印变量？

Answer 1

如果您有专门的对象制作功能，您可以随时跟踪该功能。

Answer 2

(setf object-name (print (make-the-object :obj-var value :obj-var value)))