diff options
| -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 4bf56c31..485d83be 100644 --- a/share/txr/stdlib/compiler.tl +++ b/share/txr/stdlib/compiler.tl @@ -1522,7 +1522,7 @@ ((and fix-arg-exprs apply-list-expr) (lambda-too-many-args lm-expr)) (apply-list-expr - (add ^(,al-val ,apply-list-expr)) + (add* ^(,al-val ,apply-list-expr)) (when pars.req (add ^(,ign-sym (if (< (len ,al-val) ,(len pars.req)) (lambda-short-apply-list))))) |