summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2020-04-05 10:27:33 -0700
committerKaz Kylheku <kaz@kylheku.com>2020-04-05 10:27:33 -0700
commitbc644ad2d6cf1ad3cd888a094bb2dedeb8e62d6f (patch)
tree25f9af487a6249ab847ad2e9d1cf116d11ea95b7
parentb6042a045a4e35da0821c0a7c8146d2bc90b175f (diff)
downloadtxr-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-xtags.tl2
1 files changed, 1 insertions, 1 deletions
diff --git a/tags.tl b/tags.tl
index a5088301..42c52910 100755
--- a/tags.tl
+++ b/tags.tl
@@ -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)))