[Guile-commits] 44/99: Update primitives in no-values-primitives

[Christopher Allan Webber]

cwebber pushed a commit to branch compile-to-js-merge
in repository guile.

commit 602bfb559dc00375cacf3f70e04b8b80e5c5959f
Author: Ian Price <ianprice90@googlemail.com>
AuthorDate: Thu Jun 15 20:25:24 2017 +0100

    Update primitives in no-values-primitives
    
    * module/language/js-il/inlining.scm (no-values-primitives): Update.
---
 module/language/js-il/inlining.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/module/language/js-il/inlining.scm 
b/module/language/js-il/inlining.scm
index 72df222..7d30dbe 100644
--- a/module/language/js-il/inlining.scm
+++ b/module/language/js-il/inlining.scm
@@ -69,7 +69,7 @@
   counts)
 
 (define no-values-primitives
-  '(define!
+  '(
     cache-current-module!
     set-cdr!
     set-car!
@@ -83,6 +83,7 @@
     unwind
     push-fluid
     pop-fluid
+    handle-interrupts
     ))
 
 (define no-values-primitive?