# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 1075118039 0
# Node ID 47b66024b855bd445a652f68bb6ad5800cac8973
# Parent  7e4022bbad27405e4e627e19baf4ccff0273412c
(print_preprocess): Declare size as EMACS_INT to not lose bits.
(print_object): Likewise.

diff -r 7e4022bbad27 -r 47b66024b855 src/print.c
--- a/src/print.c	Mon Jan 26 03:27:33 2004 +0000
+++ b/src/print.c	Mon Jan 26 11:53:59 2004 +0000
@@ -1276,7 +1276,8 @@
 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 @@
 	}
       else
 	{
-	  int size = XVECTOR (obj)->size;
+	  EMACS_INT size = XVECTOR (obj)->size;
 	  if (COMPILEDP (obj))
 	    {
 	      PRINTCHAR ('#');