Revert to locale-dependent toupper and tolower

To avoid leaving Guile in a broken state, the conversion
from locale-dependent case modification to Unicode case modification
should be an atomic commit

* libguile/chars.c (scm_c_upcase): revert to locale-dependent
  toupper and tolower

1 files changed, 8 insertions, 2 deletions

diff --git a/libguile/chars.c b/libguile/chars.c
index 2103c540c..56239f597 100644
--- a/libguile/chars.c
+++ b/libguile/chars.c
@@ -296,14 +296,20 @@ TODO: change name  to scm_i_.. ? --hwn
 scm_t_wchar
 scm_c_upcase (scm_t_wchar c)
 {
-  return uc_toupper (c);
+  if (c > 255)
+    return c;
+
+  return toupper ((int) c);
 }
 
 
 scm_t_wchar
 scm_c_downcase (scm_t_wchar c)
 {
-  return uc_tolower (c);
+  if (c > 255)
+    return c;
+
+  return tolower ((int) c);
 }