Lisp 获取用户创建的变量列表

我想得到我在lisp会话中创建的所有变量的列表。我认为，通过查看CommonLispUser中的所有符号，这应该是可能的。但是如何获得这样的列表呢？

您可以使用

do symbols

在

common lisp user

包中查找符号

---

请参见

仅从

cl用户获取绑定变量

您使用

do符号

迭代所有绑定符号，并排除从其他软件包导入的符号：

(let ((external-symbols (mapcan (lambda (pkg)
                                  (let (rez)
                                    (do-symbols (s pkg rez)
                                      (push s rez))))
                                (package-use-list (find-package 'cl-user)))))
  (do-symbols (s 'cl-user)
    (when (and (boundp s)
               (not (member s external-symbols)))
      (print s))))