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

* gc.c (scm_gc_sweep): added a `continue' statement that have

Browse source 
fallen through the cracks in the merge.  thanks to Shuji Narazaki!
This commit is contained in:
Michael Livshin 2000-08-19 19:20:21 +00:00
parent 5aba8e27ab
commit 7bb8eac780
1 changed files with 7 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/gc.c
View file

@ -1601,6 +1601,7 @@ scm_gc_sweep ()
*/ */
SCM_SET_STRUCT_GC_CHAIN (scmptr, scm_structs_to_free); SCM_SET_STRUCT_GC_CHAIN (scmptr, scm_structs_to_free);
scm_structs_to_free = scmptr; scm_structs_to_free = scmptr;
continue;
} }
/* fall through so that scmptr gets collected */ /* fall through so that scmptr gets collected */
} }