X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fdoprnt.c;h=d75f6fadcae1695a059f63443ac394d5131af76a;hb=2737412eae9b411d8e806b04d9f15e12cd3128da;hp=6b78e779209a8dcc80c39620a943ea5ae0e6a3be;hpb=ee38d21b330f5001b47a577cefb5ba7b82a3b7d3;p=chise%2Fxemacs-chise.git.1 diff --git a/src/doprnt.c b/src/doprnt.c index 6b78e77..d75f6fa 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"; @@ -569,7 +569,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); }