From: tomo <tomo>
Date: Thu, 14 Jun 2001 09:00:47 +0000 (+0000)
Subject: (unsigned_int_converters): Add `c'.
X-Git-Tag: r21-2-38-utf-2000-0_17-1~592
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=40d9d9f04b904aaedbcb97335bbd4f1789808d88;p=chise%2Fxemacs-chise.git.1

(unsigned_int_converters): Add `c'.
(emacs_doprnt_1): Use `XUINT' for unsigned integers.
---

diff --git a/src/doprnt.c b/src/doprnt.c
index 74d4c27..5012158 100644
--- a/src/doprnt.c
+++ b/src/doprnt.c
@@ -34,7 +34,7 @@ Boston, MA 02111-1307, USA.  */
 static const char * const valid_flags = "-+ #0";
 static const char * const valid_converters = "dic" "ouxX" "feEgG" "sS";
 static const char * const int_converters = "dic";
-static const char * const unsigned_int_converters = "ouxX";
+static const char * const unsigned_int_converters = "ouxXc";
 static const char * const double_converters = "feEgG";
 static const char * const string_converters = "sS";
 
@@ -586,7 +586,7 @@ emacs_doprnt_1 (Lisp_Object stream, const Bufbyte *format_nonreloc,
 		    obj = Ftruncate (obj);
 
 		  if (strchr (unsigned_int_converters, ch))
-		    arg.ul = (unsigned long) XINT (obj);
+		    arg.ul = (unsigned long) XUINT (obj);
 		  else
 		    arg.l = XINT (obj);
 		}