diff options
| author | Andreas Schwab <schwab@suse.de> | 2004-06-13 15:33:33 +0000 |
|---|---|---|
| committer | Andreas Schwab <schwab@suse.de> | 2004-06-13 15:33:33 +0000 |
| commit | 474f84d92535b4caf163e0c7c8b0717c0ab4126e (patch) | |
| tree | 92ea482f02d117c97edec44efe2822c7de84f936 /src/print.c | |
| parent | 874757e8ed7e05f2359de29083861e4a83a456c2 (diff) | |
| download | emacs-474f84d92535b4caf163e0c7c8b0717c0ab4126e.tar.gz | |
(print_object): Always use %ld for printing EMACS_INT.
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/print.c b/src/print.c index 0e07cd6fdd3..a91276d409a 100644 --- a/src/print.c +++ b/src/print.c @@ -1822,7 +1822,7 @@ print_object (obj, printcharfun, escapeflag) PRINTCHAR ('#'); PRINTCHAR ('&'); - sprintf (buf, "%d", XBOOL_VECTOR (obj)->size); + sprintf (buf, "%ld", (long) XBOOL_VECTOR (obj)->size); strout (buf, -1, -1, printcharfun, 0); PRINTCHAR ('\"'); @@ -1875,7 +1875,7 @@ print_object (obj, printcharfun, escapeflag) else if (WINDOWP (obj)) { strout ("#<window ", -1, -1, printcharfun, 0); - sprintf (buf, "%d", XFASTINT (XWINDOW (obj)->sequence_number)); + sprintf (buf, "%ld", (long) XFASTINT (XWINDOW (obj)->sequence_number)); strout (buf, -1, -1, printcharfun, 0); if (!NILP (XWINDOW (obj)->buffer)) { @@ -1896,8 +1896,8 @@ print_object (obj, printcharfun, escapeflag) PRINTCHAR (' '); strout (SDATA (SYMBOL_NAME (h->weak)), -1, -1, printcharfun, 0); PRINTCHAR (' '); - sprintf (buf, "%d/%d", XFASTINT (h->count), - XVECTOR (h->next)->size); + sprintf (buf, "%ld/%ld", (long) XFASTINT (h->count), + (long) XVECTOR (h->next)->size); strout (buf, -1, -1, printcharfun, 0); } sprintf (buf, " 0x%lx", (unsigned long) h); @@ -2020,7 +2020,7 @@ print_object (obj, printcharfun, escapeflag) break; case Lisp_Misc_Intfwd: - sprintf (buf, "#<intfwd to %d>", *XINTFWD (obj)->intvar); + sprintf (buf, "#<intfwd to %ld>", (long) *XINTFWD (obj)->intvar); strout (buf, -1, -1, printcharfun, 0); break; |