mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-01 20:30:28 +02:00
Code Activity

Update primitives in no-values-primitives

Browse source 
* module/language/js-il/inlining.scm (no-values-primitives): Update.
This commit is contained in:
Ian Price 2017-06-15 20:25:24 +01:00
parent 8777c20e94
commit 602bfb559d
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
module/language/js-il/inlining.scm
View file

@ -69,7 +69,7 @@
counts) counts)
(define no-values-primitives (define no-values-primitives
'(define! '(
cache-current-module! cache-current-module!
set-cdr! set-cdr!
set-car! set-car!
@ -83,6 +83,7 @@
unwind unwind
push-fluid push-fluid
pop-fluid pop-fluid
handle-interrupts
)) ))
(define no-values-primitive? (define no-values-primitive?