diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2019-06-20 20:31:28 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2019-06-20 20:31:28 -0700 |
| commit | a7ed8d2cd3f248b216e3a5c9764ddf53cfe2cde2 (patch) | |
| tree | 97e13fdb4c01b01de1b2f224abfcfe57c8083a2f | |
| parent | 035649f083a3de9e73701023751ebff477ba70ec (diff) | |
| download | txr-a7ed8d2cd3f248b216e3a5c9764ddf53cfe2cde2.tar.gz txr-a7ed8d2cd3f248b216e3a5c9764ddf53cfe2cde2.tar.bz2 txr-a7ed8d2cd3f248b216e3a5c9764ddf53cfe2cde2.zip | |
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.
| -rw-r--r-- | share/txr/stdlib/compiler.tl | 2 |
1 files changed, 1 insertions, 1 deletions
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))))) |