[Guile-commits] 03/04: Fix baseline canonicalization of reifying prompts

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit 2e6f2feefc8c7f2027299a10ada2307fb6deb430
Author: Andy Wingo <address@hidden>
AuthorDate: Mon May 11 11:05:06 2020 +0200

    Fix baseline canonicalization of reifying prompts
    
    * module/language/tree-il/compile-bytecode.scm (canonicalize): Fix arg
      order to make-prompt.
---
 module/language/tree-il/compile-bytecode.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/module/language/tree-il/compile-bytecode.scm 
b/module/language/tree-il/compile-bytecode.scm
index 4ccc841..1954240 100644
--- a/module/language/tree-il/compile-bytecode.scm
+++ b/module/language/tree-il/compile-bytecode.scm
@@ -516,7 +516,7 @@
        ;; expressions.  (Escape-only prompt bodies are already
        ;; expressions.)
        (($ <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))