diff src/print.c @ 2:ac2d302a0011 r19-15b2

Import from CVS: tag r19-15b2
author cvs
date Mon, 13 Aug 2007 08:46:35 +0200
parents 376386a54a3c
children 0293115a14e9
line wrap: on
line diff
--- a/src/print.c	Mon Aug 13 08:45:53 2007 +0200
+++ b/src/print.c	Mon Aug 13 08:46:35 2007 +0200
@@ -1010,7 +1010,8 @@
   /* we don't really want to see that junk in the bytecode instructions. */
   if (STRINGP (b->bytecodes) && !print_readably)
     {
-      sprintf (buf, "\"...(%ld)\"", string_length (XSTRING (b->bytecodes)));
+      sprintf (buf, "\"...(%ld)\"",
+	       (long) string_length (XSTRING (b->bytecodes)));
       write_c_string (buf, printcharfun);
     }
   else