diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2018-03-29 21:09:50 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2018-03-29 21:09:50 -0700 |
commit | 0b8db9cc49c14041b43f0ed16c2fd7bdaf441d89 (patch) | |
tree | e49c510fb24cb76e8a62798a0d65c0c3a96a76c7 | |
parent | 68ec8b89dca3da4517cd32a3c551747b600bc0d8 (diff) | |
download | txr-0b8db9cc49c14041b43f0ed16c2fd7bdaf441d89.tar.gz txr-0b8db9cc49c14041b43f0ed16c2fd7bdaf441d89.tar.bz2 txr-0b8db9cc49c14041b43f0ed16c2fd7bdaf441d89.zip |
compiler: change message for uhandled special op.
* share/txr/stdlib/compiler.tl (compiler compile): All
special forms are handled, so "not handled yet" wording is
inappropriate. Going forward, no special form will be added
without compiler support.
-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 b6e9e786..b7b51152 100644 --- a/share/txr/stdlib/compiler.tl +++ b/share/txr/stdlib/compiler.tl @@ -234,7 +234,7 @@ sys:qquote sys:unquote sys:splice) (compile-error form "unexpanded quasiquote encountered")) (t - (compile-error form "special op ~s not handled yet" sym)))) + (compile-error form "unrecognized special operator ~s" sym)))) ((bindable sym) me.(comp-fun-form oreg env form)) (t (compile-error form "invalid operator"))))))) |