Common Lisp : cdr 共享数据结构

见：Common_Lisp：A_Gentle_Introduction_to_Symbolic_Computation 6.12


> (setf x '(a b c))
(A B C)
> (setf y (cons 'd (cdr x)))
(D B C)

这里y会与x共享数据结构，因为y在构造时用到了(cdr x)