mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 07:30:32 +02:00
Code Activity

fix asyncs running in the vm; re-enable popen.scm compilation

Browse source 
* libguile/vm-i-system.c (goto/args): Sync the registers before doing the
  SCM_TICK. We probably need a different SCM_TICK that saves the regs
  only if necessary. This fixes GC problems with a compiled popen.scm.

* ice-9/Makefile.am: Re-enable popen.scm compilation.
This commit is contained in:
Andy Wingo 2008-10-16 12:55:27 +02:00
parent 2588eccdf4
commit 28a2f57bde
2 changed files with 3 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/vm-i-system.c
View file

@ -604,6 +604,7 @@ VM_DEFINE_INSTRUCTION (goto_args, "goto/args", 1, -1, 1)
vm_goto_args:
x = sp[-nargs];
SYNC_REGISTER ();
SCM_TICK; /* allow interrupt here */
/*