summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael Gran <spk121@yahoo.com>2009-08-21 09:30:53 -0700
committerMichael Gran <spk121@yahoo.com>2009-08-21 09:30:53 -0700
commitcdf8f9e6328ff86c1828a16540a607c46f76963a (patch)
tree4d36512a782803d1a0fc9b1c60f2babe53ca5bb8
parent3f47e5262103a01476c9df5275d23f4364cb4266 (diff)
downloadguile-cdf8f9e6328ff86c1828a16540a607c46f76963a.tar.gz
Use uc_tolower in number conversion
* libguile/numbers.c (XDIGIT2UINT): use uc_tolower
-rw-r--r--libguile/numbers.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/numbers.c b/libguile/numbers.c
index ff963dbfa..58125763f 100644
--- a/libguile/numbers.c
+++ b/libguile/numbers.c
@@ -2488,7 +2488,7 @@ enum t_exactness {NO_EXACTNESS, INEXACT, EXACT};
#define XDIGIT2UINT(d) \
(uc_is_property_decimal_digit ((int) (unsigned char) d) \
? (d) - '0' \
- : tolower ((int) (unsigned char) d) - 'a' + 10)
+ : uc_tolower ((int) (unsigned char) d) - 'a' + 10)
static SCM
mem2uinteger (SCM mem, unsigned int *p_idx,