diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2020-07-12 11:38:30 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2020-07-12 11:38:30 -0700 |
commit | d8d2a95c287a315f7d38858b448b1f3f422ceb6c (patch) | |
tree | e91b9cf37ae27cfa86dba4d3203e77cac870848b | |
parent | 15740ae6b6c8476cd1a9323ffd50f85a3c8ea245 (diff) | |
download | txr-d8d2a95c287a315f7d38858b448b1f3f422ceb6c.tar.gz txr-d8d2a95c287a315f7d38858b448b1f3f422ceb6c.tar.bz2 txr-d8d2a95c287a315f7d38858b448b1f3f422ceb6c.zip |
tags: take advantage of weak packages.
* tags.tl (in-anon-package): Pass t to sys:make-anon-package,
so the resulting package won't hold on to symbols that the
utility isn't interested in, just because it's holding on to
other symbols that come from the smae package.
-rwxr-xr-x | tags.tl | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -67,7 +67,7 @@ (defmacro in-anon-package (. body) (with-gensyms (pkg) ^(let* ((*package-alist* *package-alist*) - (,pkg (sys:make-anon-package)) + (,pkg (sys:make-anon-package t)) (*package* ,pkg)) (set-package-fallback-list *package* '(:usr)) ,*body))) |