[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 01/01: Sync IP before allocating closures
From: |
Andy Wingo |
Subject: |
[Guile-commits] 01/01: Sync IP before allocating closures |
Date: |
Fri, 26 Jan 2018 03:56:21 -0500 (EST) |
wingo pushed a commit to branch stable-2.2
in repository guile.
commit 07b7490f73fb4a6cb0c9577d082d37c8d9cee7b0
Author: Andy Wingo <address@hidden>
Date: Mon Jan 8 15:07:42 2018 +0100
Sync IP before allocating closures
* libguile/vm-engine.c (vm_engine): Sync IP before allocating closures.
---
libguile/vm-engine.c | 1 +
1 file changed, 1 insertion(+)
diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c
index 6c88ebf..9509cd6 100644
--- a/libguile/vm-engine.c
+++ b/libguile/vm-engine.c
@@ -1646,6 +1646,7 @@ VM_NAME (scm_i_thread *thread, struct scm_vm *vp,
UNPACK_24 (ip[2], nfree);
// FIXME: Assert range of nfree?
+ SYNC_IP ();
closure = scm_inline_words (thread, scm_tc7_program | (nfree << 16),
nfree + 2);
SCM_SET_CELL_WORD_1 (closure, ip + offset);