diff options
author | Michael Gran <spk121@yahoo.com> | 2009-08-21 09:30:53 -0700 |
---|---|---|
committer | Michael Gran <spk121@yahoo.com> | 2009-08-21 09:30:53 -0700 |
commit | cdf8f9e6328ff86c1828a16540a607c46f76963a (patch) | |
tree | 4d36512a782803d1a0fc9b1c60f2babe53ca5bb8 /libguile/numbers.c | |
parent | 3f47e5262103a01476c9df5275d23f4364cb4266 (diff) | |
download | guile-cdf8f9e6328ff86c1828a16540a607c46f76963a.tar.gz |
Use uc_tolower in number conversion
* libguile/numbers.c (XDIGIT2UINT): use uc_tolower
Diffstat (limited to 'libguile/numbers.c')
-rw-r--r-- | libguile/numbers.c | 2 |
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, |