[uim-commit] r3044 - branches/r5rs/sigscheme/src

[yamaken at freedesktop.org]

Author: yamaken
Date: 2006-01-30 10:06:59 -0800 (Mon, 30 Jan 2006)
New Revision: 3044

Modified:
   branches/r5rs/sigscheme/src/number.c
Log:
* sigscheme/src/number.c
  - (scm_p_number2string): Make hexadecimal letters lower case


Modified: branches/r5rs/sigscheme/src/number.c
===================================================================
--- branches/r5rs/sigscheme/src/number.c	2006-01-30 09:50:06 UTC (rev 3043)
+++ branches/r5rs/sigscheme/src/number.c	2006-01-30 18:06:59 UTC (rev 3044)
@@ -460,7 +460,7 @@
 
   do {
       digit = un % r;
-      *--p = (digit <= 9) ? '0' + digit : 'A' + digit - 10;
+      *--p = (digit <= 9) ? '0' + digit : 'a' + digit - 10;
   } while (un /= r);
   if (neg)
     *--p = '-';