mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-10 07:50:24 +02:00
Code Activity

no gc_register_root in scm_init_print

Browse source 
* libguile/print.c (scm_init_print): No need to gc_register_root here.
This commit is contained in:
Andy Wingo 2011-11-18 11:01:13 +01:00
parent 086063aa32
commit 2ec8da2e45
1 changed files with 0 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/print.c
View file

@ -1529,8 +1529,6 @@ scm_init_print ()
scm_from_latin1_symbol ("highlight-suffix"), scm_from_latin1_symbol ("highlight-suffix"),
scm_from_locale_string ("}"))); scm_from_locale_string ("}")));
scm_gc_register_root (&print_state_pool);
scm_gc_register_root (&scm_print_state_vtable);
type = scm_make_vtable (scm_from_locale_string (SCM_PRINT_STATE_LAYOUT), type = scm_make_vtable (scm_from_locale_string (SCM_PRINT_STATE_LAYOUT),
SCM_BOOL_F); SCM_BOOL_F);
scm_set_struct_vtable_name_x (type, scm_from_latin1_symbol ("print-state")); scm_set_struct_vtable_name_x (type, scm_from_latin1_symbol ("print-state"));