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

(root_mark): Mark active_asyncs slot.

Browse source
This commit is contained in:
Marius Vollmer 2002-10-05 13:07:06 +00:00
parent f6b44bd99f
commit a7d3641dc2
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/root.c
View file

@ -80,6 +80,7 @@ root_mark (SCM root)
scm_gc_mark (s->cur_errp); scm_gc_mark (s->cur_errp);
/* No need to gc mark def_loadp */ /* No need to gc mark def_loadp */
scm_gc_mark (s->fluids); scm_gc_mark (s->fluids);
scm_gc_mark (s->active_asyncs);
return SCM_ROOT_STATE (root) -> parent; return SCM_ROOT_STATE (root) -> parent;
} }