mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

Fix prompt compilation

Browse source 
* module/language/tree-il/compile-bytecode.scm (compile-closure): Fix
  emit-prompt invocation.
This commit is contained in:
Andy Wingo 2020-05-04 22:56:23 +02:00
parent 7a1b7bc485
commit 728de16911
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/language/tree-il/compile-bytecode.scm
View file

@ -840,7 +840,7 @@ in the frame with for the lambda-case clause @var{clause}."
(khandler (gensym "handler")) (khandler (gensym "handler"))
(done (gensym "done"))) (done (gensym "done")))
(emit-prompt src tag escape-only? proc-slot khandler) (emit-prompt asm tag escape-only? proc-slot khandler)
(match ctx (match ctx
('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