如何从Lisp镜像中彻底删除函数、变量或符号？

在Common Lisp中，重定义或重命名符号关联的对象不会自动移除符号本身或清理绑定，需要分步骤完成彻底删除：

1. 清除符号的所有绑定 #

先移除符号关联的各类定义（函数、变量、宏等）：

• 清除函数绑定：使用fmakunbound清除符号的函数定义

  (fmakunbound 'read-csv)
  

• 清除变量绑定：使用makunbound清除全局变量（包括defparameter/defvar创建的变量）的绑定

  (makunbound 'hi)
  

• 清除宏绑定：如果符号是宏，需要清除其宏定义

  (setf (macro-function 'my-macro) nil)
  

2. 从包中移除符号 #

清除绑定后，需要将符号从所属包中取消注册，这样do-symbols等遍历包符号的操作就不会再找到它：
使用unintern函数，指定目标符号和所属包：

;; 从:my-package包中移除read-csv符号
(unintern 'read-csv :my-package)
;; 从包中移除hi符号
(unintern 'hi :my-package)

unintern返回t表示移除成功，nil表示符号不在指定包中。

3. 手动触发垃圾回收（可选） #

清除绑定并移除符号后，该符号会成为无引用的垃圾对象，但Lisp垃圾回收器不会立即回收。若需尽快释放内存，可手动触发GC（不同Lisp实现的GC函数略有差异）：

;; SBCL
(gc)
;; Clozure CL
(ccl:gc)
;; CMUCL
(ext:gc)

注意事项 #

• 若仅需让符号不再指向旧定义，无需彻底删除符号，仅执行fmakunbound/makunbound即可；若要让符号完全从包的符号列表中消失，必须执行unintern。
• 执行makunbound后，引用该符号会触发"unbound variable"错误，直到重新定义。
• 不要随意修改系统包或第三方包中的符号，仅处理自定义包内的符号，避免引发不可预期的错误。

内容的提问来源于stack exchange，提问作者Vinn