diff options
Diffstat (limited to 'libguile/chars.c')
-rw-r--r-- | libguile/chars.c | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/libguile/chars.c b/libguile/chars.c index 552a2d9c1..c7cb09c47 100644 --- a/libguile/chars.c +++ b/libguile/chars.c @@ -296,20 +296,14 @@ TODO: change name to scm_i_.. ? --hwn scm_t_wchar scm_c_upcase (scm_t_wchar c) { - if (c > 255) - return c; - - return toupper ((int) c); + return uc_toupper ((int) c); } scm_t_wchar scm_c_downcase (scm_t_wchar c) { - if (c > 255) - return c; - - return tolower ((int) c); + return uc_tolower ((int) c); } |