From 602bfb559dc00375cacf3f70e04b8b80e5c5959f Mon Sep 17 00:00:00 2001
From: Ian Price <ianprice90@googlemail.com>
Date: Thu, 15 Jun 2017 20:25:24 +0100
Subject: [PATCH] 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 72df2226b..7d30dbeb8 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?