在 common lisp 中复制结构列表答案

【问题标题】：copying list of structs in common lisp在 common lisp 中复制结构列表
【发布时间】：2012-10-07 06:37:12
【问题描述】：

我有一个结构列表，我想编写一个函数来改变结构中的一些槽而不影响原始列表。我尝试使用复制列表，但它不够深；插槽值也在原始列表中更改。我的问题是，是否有一个内置函数可以满足我的需求？还是我应该自己编写一个？谢谢。

编辑：

我继续写了自己的函数，有没有内置的函数可以做到这一点？

(defun deep-copy (li)
    (if (null li)
        nil
        (cons (copy-structure (car li)) (deep-copy (rest li)))))

【问题讨论】：

【解决方案1】：

预定义该功能没有什么价值。

您的代码只是：

(mapcar #'copy-structure some-list)

【讨论】：