diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2019-03-02 12:28:52 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2019-03-02 12:28:52 -0800 |
| commit | 5fab9b29d0cc5cadb5a3783534cfdb270b48a7b5 (patch) | |
| tree | 14a1f3fdadf900035bae1deaeaec5b65a73b635c /share | |
| parent | 6d43b61b6694b4554cf123d6deec4504281d7478 (diff) | |
| download | txr-5fab9b29d0cc5cadb5a3783534cfdb270b48a7b5.tar.gz txr-5fab9b29d0cc5cadb5a3783534cfdb270b48a7b5.tar.bz2 txr-5fab9b29d0cc5cadb5a3783534cfdb270b48a7b5.zip | |
compiler: use new load-for.
* share/txr/stdlib/compiler.tl: use load-for macro to
load the param module.
Diffstat (limited to 'share')
| -rw-r--r-- | share/txr/stdlib/compiler.tl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/share/txr/stdlib/compiler.tl b/share/txr/stdlib/compiler.tl index ef79a418..cbd2b6ee 100644 --- a/share/txr/stdlib/compiler.tl +++ b/share/txr/stdlib/compiler.tl @@ -27,8 +27,7 @@ (load "vm-param") (compile-only - (unless (find-struct-type 'sys:param-parser-base) - (load "param"))) + (load-for (struct sys:param-parser-base "param"))) (defstruct (frag oreg code : fvars ffuns) nil oreg |