mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

* Initialize symbols using SCM_(GLOBAL_)?SYMBOL instead of scm_sysintern...

Browse source 
* Use scm_str2symbol instead of scm_sysintern0.
* Garbage collection initialization code now within gc.c only.
This commit is contained in:
Dirk Herrmann 2000-12-11 14:48:23 +00:00
parent 24737ba02a
commit 85db4a2c8e
11 changed files with 102 additions and 86 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/variable.c
View file

@ -83,7 +83,7 @@ variable_equalp (SCM var1, SCM var2)
}
static SCM anonymous_variable_sym;
SCM_SYMBOL (anonymous_variable_sym, "anonymous-variable");
static SCM
@ -229,7 +229,6 @@ scm_init_variable ()
scm_set_smob_print (scm_tc16_variable, variable_print);
scm_set_smob_equalp (scm_tc16_variable, variable_equalp);
anonymous_variable_sym = SCM_CAR (scm_sysintern ("anonymous-variable", SCM_UNDEFINED));
#ifndef SCM_MAGIC_SNARFER
#include "libguile/variable.x"
#endif