From: Andreas Schwab <schwab@suse.de>
Date: Mon, 26 Jan 2004 11:53:59 +0000 (+0000)
Subject: (print_preprocess): Declare size as EMACS_INT to not lose bits.
X-Git-Tag: ttn-vms-21-2-B4~7829
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3164abe6d1794bdeeb6465c008755abb0bfd8ebe;p=emacs.git

(print_preprocess): Declare size as EMACS_INT to not lose bits.
(print_object): Likewise.
---

diff --git a/src/print.c b/src/print.c
index 597345c129c..89690fe5399 100644
--- a/src/print.c
+++ b/src/print.c
@@ -1276,7 +1276,8 @@ static void
 print_preprocess (obj)
      Lisp_Object obj;
 {
-  int i, size;
+  int i;
+  EMACS_INT size;
 
  loop:
   if (STRINGP (obj) || CONSP (obj) || VECTORP (obj)
@@ -1891,7 +1892,7 @@ print_object (obj, printcharfun, escapeflag)
 	}
       else
 	{
-	  int size = XVECTOR (obj)->size;
+	  EMACS_INT size = XVECTOR (obj)->size;
 	  if (COMPILEDP (obj))
 	    {
 	      PRINTCHAR ('#');