Mercurial > emacs

changeset 34798:9794feac3a9d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(print_unwind): Return nil. (PRINTDECLARE): Initialize all local variables. (print_preprocess): Add a default case.
author Gerd Moellmann <gerd@gnu.org>
date Thu, 21 Dec 2000 20:40:10 +0000
parents b473bc6d9a55
children c04a8de55245
files src/print.c
diffstat 1 files changed, 8 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/print.c	Thu Dec 21 19:58:34 2000 +0000
+++ b/src/print.c	Thu Dec 21 20:40:10 2000 +0000
@@ -1,5 +1,5 @@
 /* Lisp object printing and output streams.
-   Copyright (C) 1985, 86, 88, 93, 94, 95, 97, 98, 1999
+   Copyright (C) 1985, 86, 88, 93, 94, 95, 97, 98, 1999, 2000
 	Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
@@ -190,8 +190,8 @@
 
 #define PRINTDECLARE							\
    struct buffer *old = current_buffer;					\
-   int old_point = -1, start_point;					\
-   int old_point_byte, start_point_byte;				\
+   int old_point = -1, start_point = -1;				\
+   int old_point_byte = -1, start_point_byte = -1;			\
    int specpdl_count = specpdl_ptr - specpdl;				\
    int free_print_buffer = 0;						\
    int multibyte = !NILP (current_buffer->enable_multibyte_characters);	\
@@ -291,6 +291,7 @@
      Lisp_Object saved_text;
 {
   bcopy (XSTRING (saved_text)->data, print_buffer, XSTRING (saved_text)->size);
+  return Qnil;
 }
 
 
@@ -1186,6 +1187,10 @@
 	  size = XVECTOR (obj)->size & PSEUDOVECTOR_SIZE_MASK;
 	  for (i = 0; i < size; i++)
 	    print_preprocess (XVECTOR (obj)->contents[i]);
+	  break;
+
+	default:
+	  break;
 	}
     }
 }