diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1996-09-13 11:07:24 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1996-09-13 11:07:24 +0000 |
commit | e2806c1000054f765c46bd14f8fb64a4d74d4eea (patch) | |
tree | 92ff61f63e724f41c946a22ed4944a67d304ade9 /libguile/chars.c | |
parent | 1a80fb07a7658c8ba90dcda50d34547752469088 (diff) | |
download | guile-e2806c1000054f765c46bd14f8fb64a4d74d4eea.tar.gz |
* __scm.h, chars.c, debug.c, eval.c, eval.h, extchrs.c, extchrs.h,
fdsocket.c, feature.c, mbstrings.c, mbstrings.h, numbers.c,
numbers.h, print.c, scmhob.h, simpos.h, symbols.c, symbols.h,
tags.h, throw.c, variable.h: Name cleanup. Lots of xxxSCM_yyy
removed. (These were introduced by unsupervised name
substitution.)
Diffstat (limited to 'libguile/chars.c')
-rw-r--r-- | libguile/chars.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/chars.c b/libguile/chars.c index eb3622f0d..773be4d81 100644 --- a/libguile/chars.c +++ b/libguile/chars.c @@ -384,8 +384,8 @@ scm_char_downcase(chr) -static unsigned char scm_upcase_table[SCM_CHAR_SCM_CODE_LIMIT]; -static unsigned char scm_downcase_table[SCM_CHAR_SCM_CODE_LIMIT]; +static unsigned char scm_upcase_table[SCM_CHAR_CODE_LIMIT]; +static unsigned char scm_downcase_table[SCM_CHAR_CODE_LIMIT]; static unsigned char scm_lowers[] = "abcdefghijklmnopqrstuvwxyz"; static unsigned char scm_uppers[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"; @@ -398,7 +398,7 @@ scm_tables_prehistory () #endif { int i; - for (i = 0; i < SCM_CHAR_SCM_CODE_LIMIT; i++) + for (i = 0; i < SCM_CHAR_CODE_LIMIT; i++) scm_upcase_table[i] = scm_downcase_table[i] = i; for (i = 0; i < sizeof scm_lowers / sizeof (char); i++) { |