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

(SCM_KEYWORD, SCM_GLOBAL_KEYWORD): Use scm_from_locale_keyword instead

of scm_c_make_keyword.
This commit is contained in:
Marius Vollmer 2004-10-04 17:58:40 +00:00
parent 92b51af6c1
commit ee4140fb99

View file

@ -183,11 +183,11 @@ SCM_SNARF_INIT(c_name = scm_permanent_object (scm_from_locale_symbol (scheme_nam
#define SCM_KEYWORD(c_name, scheme_name) \
SCM_SNARF_HERE(static SCM c_name) \
SCM_SNARF_INIT(c_name = scm_permanent_object (scm_c_make_keyword (scheme_name)))
SCM_SNARF_INIT(c_name = scm_permanent_object (scm_from_locale_keyword (scheme_name)))
#define SCM_GLOBAL_KEYWORD(c_name, scheme_name) \
SCM_SNARF_HERE(SCM c_name) \
SCM_SNARF_INIT(c_name = scm_permanent_object (scm_c_make_keyword (scheme_name)))
SCM_SNARF_INIT(c_name = scm_permanent_object (scm_from_locale_keyword (scheme_name)))
#define SCM_VARIABLE(c_name, scheme_name) \
SCM_SNARF_HERE(static SCM c_name) \