diff options
author | Andy Wingo <wingo@pobox.com> | 2011-10-25 17:45:29 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-10-25 17:45:29 +0200 |
commit | 25d50a051d8de9c438d6ed910bec13be682b3b12 (patch) | |
tree | 442f495241a9da699421562f190c6b37617bfcc5 /libguile/expand.c | |
parent | f80d15c59e962d197c0cb8e98fd84bdd27bc449e (diff) | |
download | guile-25d50a051d8de9c438d6ed910bec13be682b3b12.tar.gz |
most uses of scm_from_locale_symbol become scm_from_utf8_symbol
* libguile/array-handle.c:
* libguile/chars.c:
* libguile/expand.c:
* libguile/feature.c:
* libguile/goops.c:
* libguile/gsubr.c:
* libguile/instructions.c:
* libguile/load.c:
* libguile/macros.c:
* libguile/memoize.c:
* libguile/modules.c:
* libguile/options.c:
* libguile/print.c:
* libguile/smob.c:
* libguile/snarf.h: Change most uses of scm_from_locale_symbol to
scm_from_utf8_symbol, as the symbols really are not locale-dependent.
Diffstat (limited to 'libguile/expand.c')
-rw-r--r-- | libguile/expand.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/expand.c b/libguile/expand.c index 78dd4cac4..3f23d4f8f 100644 --- a/libguile/expand.c +++ b/libguile/expand.c @@ -1214,13 +1214,13 @@ make_exp_vtable (size_t n) (scm_string_append (scm_make_list (scm_from_size_t (exp_nfields[n]), scm_from_locale_string ("pw")))); printer = SCM_BOOL_F; - name = scm_from_locale_symbol (exp_names[n]); + name = scm_from_utf8_symbol (exp_names[n]); code = scm_from_size_t (n); fields = SCM_EOL; { size_t m = exp_nfields[n]; while (m--) - fields = scm_cons (scm_from_locale_symbol (exp_field_names[n][m]), fields); + fields = scm_cons (scm_from_utf8_symbol (exp_field_names[n][m]), fields); } return scm_c_make_struct (scm_exp_vtable_vtable, 0, 5, |