summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIan Price <ianprice90@googlemail.com>2017-06-15 20:25:24 +0100
committerIan Price <ianprice90@googlemail.com>2017-06-15 20:25:24 +0100
commit602bfb559dc00375cacf3f70e04b8b80e5c5959f (patch)
treecdbd458f08dcdfeb6bc19f3180e85841b3d74d5b
parent8777c20e941d3a927a20c62e42b31f0fbd3a7571 (diff)
downloadguile-602bfb559dc00375cacf3f70e04b8b80e5c5959f.tar.gz
Update primitives in no-values-primitives
* module/language/js-il/inlining.scm (no-values-primitives): Update.
-rw-r--r--module/language/js-il/inlining.scm3
1 files changed, 2 insertions, 1 deletions
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?