diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2020-04-05 10:27:33 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2020-04-05 10:27:33 -0700 |
commit | bc644ad2d6cf1ad3cd888a094bb2dedeb8e62d6f (patch) | |
tree | 25f9af487a6249ab847ad2e9d1cf116d11ea95b7 | |
parent | b6042a045a4e35da0821c0a7c8146d2bc90b175f (diff) | |
download | txr-bc644ad2d6cf1ad3cd888a094bb2dedeb8e62d6f.tar.gz txr-bc644ad2d6cf1ad3cd888a094bb2dedeb8e62d6f.tar.bz2 txr-bc644ad2d6cf1ad3cd888a094bb2dedeb8e62d6f.zip |
tags: use sys:make-anon-package
* tags.tl (in-anon-package): Take advantage of the system
function sys:make-anon-package which is used in the
file compiler, instead of creating a package named "anon"
which could plausibly clash with an existing 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 (make-package "anon")) + (,pkg (sys:make-anon-package)) (*package* ,pkg)) (set-package-fallback-list *package* '(:usr)) ,*body))) |