diff options
| -rw-r--r-- | stdlib/compiler.tl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/stdlib/compiler.tl b/stdlib/compiler.tl index 6a49551a..0ad03aea 100644 --- a/stdlib/compiler.tl +++ b/stdlib/compiler.tl @@ -252,7 +252,8 @@ (defmacro compile-in-toplevel (me . body) (with-gensyms (saved-tregs saved-treg-cntr) ^(let* ((,saved-tregs (qref ,me tregs)) - (,saved-treg-cntr (qref ,me treg-cntr))) + (,saved-treg-cntr (qref ,me treg-cntr)) + (*tail-pos* nil)) (unwind-protect (progn (set (qref ,me tregs) nil |