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 baseline canonicalization of reifying prompts

Browse source 
* module/language/tree-il/compile-bytecode.scm (canonicalize): Fix arg
  order to make-prompt.
This commit is contained in:
Andy Wingo 2020-05-11 11:05:06 +02:00
parent f9c9e71046
commit 2e6f2feefc
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

@ -516,7 +516,7 @@
;; expressions. (Escape-only prompt bodies are already ;; expressions. (Escape-only prompt bodies are already
;; expressions.) ;; expressions.)
(($ <prompt> src #f tag body handler) (($ <prompt> src #f tag body handler)
(make-prompt src tag #f (make-call src body '()) handler)) (make-prompt src #f tag (make-call src body '()) handler))
(_ exp))) (_ exp)))
exp)) exp))