# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1084834060 0
# Node ID dcb7d888bb3859647a46ac0919f2bb6f88c0a602
# Parent  c8d69f7304ee206eb32624683c265f018365270c
(print_object): Increase buf size.

diff -r c8d69f7304ee -r dcb7d888bb38 src/print.c
--- a/src/print.c	Mon May 17 22:47:23 2004 +0000
+++ b/src/print.c	Mon May 17 22:47:40 2004 +0000
@@ -791,7 +791,7 @@
   if (SBYTES (object) == SCHARS (object))
     STRING_SET_UNIBYTE (object);
 
-  /* Note that this won't make prepare_to_modify_buffer call 
+  /* Note that this won't make prepare_to_modify_buffer call
      ask-user-about-supersession-threat because this buffer
      does not visit a file.  */
   Ferase_buffer ();
@@ -929,7 +929,7 @@
        doc: /* Redirect debugging output (stderr stream) to file FILE.
 If FILE is nil, reset target to the initial stderr stream.
 Optional arg APPEND non-nil (interactively, with prefix arg) means
-append to existing target file.  */) 
+append to existing target file.  */)
      (file, append)
      Lisp_Object file, append;
 {
@@ -1400,7 +1400,7 @@
      register Lisp_Object printcharfun;
      int escapeflag;
 {
-  char buf[30];
+  char buf[40];
 
   QUIT;