guile/guile-core/libguile ChangeLog gc.c

[Dirk Herrmann]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Dirk Herrmann <address@hidden>  00/12/07 05:46:33

Modified files:
        guile-core/libguile: ChangeLog gc.c 

Log message:
        * Undid my last patch and added a comment why it was unnecessary.

CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/ChangeLog.diff?r1=1.1195&r2=1.1196
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/gc.c.diff?r1=1.168&r2=1.169

Patches:
Index: guile/guile-core/libguile/ChangeLog
diff -u guile/guile-core/libguile/ChangeLog:1.1195 
guile/guile-core/libguile/ChangeLog:1.1196
--- guile/guile-core/libguile/ChangeLog:1.1195  Thu Dec  7 04:04:48 2000
+++ guile/guile-core/libguile/ChangeLog Thu Dec  7 05:46:32 2000
@@ -1,3 +1,9 @@
+2000-12-07  Dirk Herrmann  <address@hidden>
+
+       * gc.c (scm_init_gc):  gc_async is already protected from gc,
+       namely via scm_asyncs.  Thanks to Keisuke Nishida for pointing
+       this out.
+
 2000-12-07  Keisuke Nishida  <address@hidden>
 
        * smob.h (scm_smob_apply_0, scm_smob_apply_1, scm_smob_apply_2,
Index: guile/guile-core/libguile/gc.c
diff -u guile/guile-core/libguile/gc.c:1.168 
guile/guile-core/libguile/gc.c:1.169
--- guile/guile-core/libguile/gc.c:1.168        Wed Dec  6 09:11:46 2000
+++ guile/guile-core/libguile/gc.c      Thu Dec  7 05:46:33 2000
@@ -2581,8 +2581,7 @@
   scm_gc_vcell = scm_sysintern ("gc-thunk", SCM_BOOL_F);
 #endif  /* SCM_DEBUG_DEPRECATED == 0 */
   after_gc_thunk = scm_make_subr_opt ("%gc-thunk", scm_tc7_subr_0, 
gc_async_thunk, 0);
-  gc_async = scm_system_async (after_gc_thunk);
-  scm_permanent_object (gc_async);
+  gc_async = scm_system_async (after_gc_thunk);  /* protected via scm_asyncs */
 
   scm_c_hook_add (&scm_after_gc_c_hook, mark_gc_async, NULL, 0);