From 8a3e715b20285eaeb4f60b54cc4fc218c53b2901 Mon Sep 17 00:00:00 2001 From: Michael Livshin Date: Fri, 24 Aug 2001 23:57:12 +0000 Subject: [PATCH] * gc.c (scm_gc_sweep): now can sweep unreachable variables (by doing exactly nothing about them). thanks Neil! --- libguile/ChangeLog | 5 +++++ libguile/gc.c | 2 ++ 2 files changed, 7 insertions(+) diff --git a/libguile/ChangeLog b/libguile/ChangeLog index e354f6437..d44668e74 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,8 @@ +2001-08-25 Michael Livshin + + * gc.c (scm_gc_sweep): now can sweep unreachable variables (by + doing exactly nothing about them). thanks Neil! + 2001-08-18 Neil Jerram * __scm.h (SCM_ENABLE_VCELLS): Fix spelling mistake in comment. diff --git a/libguile/gc.c b/libguile/gc.c index b7a0defbf..457c0edce 100644 --- a/libguile/gc.c +++ b/libguile/gc.c @@ -1793,6 +1793,8 @@ scm_gc_sweep () m += SCM_SYMBOL_LENGTH (scmptr) + 1; scm_must_free (SCM_SYMBOL_CHARS (scmptr)); break; + case scm_tc7_variable: + break; case scm_tcs_subrs: /* the various "subrs" (primitives) are never freed */ continue;