diff options
Diffstat (limited to 'src/vm_system.c')
-rw-r--r-- | src/vm_system.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/vm_system.c b/src/vm_system.c index d1b9f61aa..4125a456c 100644 --- a/src/vm_system.c +++ b/src/vm_system.c @@ -480,6 +480,7 @@ VM_DEFINE_INSTRUCTION (call, "call", 1, -1, 1) SCM args; POP_LIST (nargs); POP (args); + SYNC_REGISTER (); *sp = scm_apply (x, args, SCM_EOL); NEXT; } @@ -601,6 +602,7 @@ VM_DEFINE_INSTRUCTION (tail_call, "tail-call", 1, -1, 1) SCM args; POP_LIST (nargs); POP (args); + SYNC_REGISTER (); *sp = scm_apply (x, args, SCM_EOL); goto vm_return; } |