* print.c (print_object) [0]: Fix printf format int width.

diff --git a/src/print.c b/src/print.c
index b91e8d7cf20ce01441ba1687acb596c59b2cf93f..8e5aab85c3c9d0f3ed38bb5c5d5c9764c0f3f234 100644 (file)
--- a/src/print.c
+++ b/src/print.c
@@ -1797,7 +1797,7 @@ print_object (Lisp_Object obj, register Lisp_Object printcharfun, int escapeflag
              PRINTCHAR (' ');
              strout (SDATA (SYMBOL_NAME (h->weak)), -1, -1, printcharfun);
              PRINTCHAR (' ');
-             sprintf (buf, "%"pI"d/%"pI"d", h->count, ASIZE (h->next));
+             sprintf (buf, "%"pD"d/%"pD"d", h->count, ASIZE (h->next));
              strout (buf, -1, -1, printcharfun);
            }
          sprintf (buf, " %p", h);