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

* gc.c (scm_gc_sweep): now can sweep unreachable variables (by

Browse source 
doing exactly nothing about them).  thanks Neil!
This commit is contained in:
Michael Livshin 2001-08-24 23:57:12 +00:00
parent ec2667f0cf
commit 8a3e715b20
2 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/ChangeLog
View file

@ -1,3 +1,8 @@
2001-08-25 Michael Livshin <mlivshin@bigfoot.com>
* gc.c (scm_gc_sweep): now can sweep unreachable variables (by
doing exactly nothing about them). thanks Neil!
2001-08-18 Neil Jerram <neil@ossau.uklinux.net> 2001-08-18 Neil Jerram <neil@ossau.uklinux.net>
* __scm.h (SCM_ENABLE_VCELLS): Fix spelling mistake in comment. * __scm.h (SCM_ENABLE_VCELLS): Fix spelling mistake in comment.

2
libguile/gc.c
View file

@ -1793,6 +1793,8 @@ scm_gc_sweep ()
m += SCM_SYMBOL_LENGTH (scmptr) + 1; m += SCM_SYMBOL_LENGTH (scmptr) + 1;
scm_must_free (SCM_SYMBOL_CHARS (scmptr)); scm_must_free (SCM_SYMBOL_CHARS (scmptr));
break; break;
case scm_tc7_variable:
break;
case scm_tcs_subrs: case scm_tcs_subrs:
/* the various "subrs" (primitives) are never freed */ /* the various "subrs" (primitives) are never freed */
continue; continue;