1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 11:50:28 +02:00

Fix compilation of prompt in tail context

* module/language/tree-il/compile-bytecode.scm (compile-closure):
  Compile body of prompt in values-at context at the frame base, not the
  current env.
This commit is contained in:
Andy Wingo 2020-05-11 10:57:29 +02:00
parent b99a63447b
commit f9c9e71046

View file

@ -850,7 +850,7 @@ in the frame with for the lambda-case clause @var{clause}."
('tail ('tail
;; Would be nice if we could invoke the body in true tail ;; Would be nice if we could invoke the body in true tail
;; context, but that's not how it currently is. ;; context, but that's not how it currently is.
(for-values body env) (for-values-at body env (frame-base env))
(emit-unwind asm) (emit-unwind asm)
(emit-return-values asm)) (emit-return-values asm))
(_ (_