From: Kim F. Storm <storm@cua.dk>
Date: Tue, 9 Nov 2004 13:24:35 +0000 (+0000)
Subject: (print_object): Fix format string.
X-Git-Tag: ttn-vms-21-2-B4~4049
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=44455197d9af613b377f15da7e3ac35c712640cd;p=emacs.git

(print_object): Fix format string.
---

diff --git a/src/print.c b/src/print.c
index 76c648b9a2e..8bb55f21248 100644
--- a/src/print.c
+++ b/src/print.c
@@ -2087,7 +2087,7 @@ print_object (obj, printcharfun, escapeflag)
 
 	case Lisp_Misc_Save_Value:
 	  strout ("#<save_value ", -1, -1, printcharfun, 0);
-	  sprintf(buf, "ptr=0x%08x int=%d",
+	  sprintf(buf, "ptr=0x%08lx int=%d",
 		  (unsigned long) XSAVE_VALUE (obj)->pointer,
 		  XSAVE_VALUE (obj)->integer);
 	  strout (buf, -1, -1, printcharfun, 0);