From a7ed8d2cd3f248b216e3a5c9764ddf53cfe2cde2 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Thu, 20 Jun 2019 20:31:28 -0700 Subject: dump-to-tlo: move to sys package. * share/txr/stdlib/compiler.tl (usr:dump-to-tlo): This function has no reason to be named by a usr package symbol. Renaming to sys:dump-to-tlo. --- share/txr/stdlib/compiler.tl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/share/txr/stdlib/compiler.tl b/share/txr/stdlib/compiler.tl index 233ef129..dfab93a9 100644 --- a/share/txr/stdlib/compiler.tl +++ b/share/txr/stdlib/compiler.tl @@ -1640,7 +1640,7 @@ (release-deferred-warnings) (compiler-emit-warnings)))))) -(defun usr:dump-to-tlo (out-stream out) +(defun dump-to-tlo (out-stream out) (let* ((*print-circle* t) (*package* (sys:make-anon-package)) (out-forms (split* out.(get) (op where (op eq :fence))))) -- cgit v1.2.3