diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2000-12-21 20:40:10 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2000-12-21 20:40:10 +0000 |
| commit | ee5263afa850a8ce859b1350ea54344d9c1d472e (patch) | |
| tree | 2e116f32f19540eda825e4cab9c4b800d5cb50bb /src/print.c | |
| parent | 88818fbedfeb7c882ac246cdd7369ed3568bf21c (diff) | |
| download | emacs-ee5263afa850a8ce859b1350ea54344d9c1d472e.tar.gz | |
(print_unwind): Return nil.
(PRINTDECLARE): Initialize all local variables.
(print_preprocess): Add a default case.
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/src/print.c b/src/print.c index b6d12f2a9fb..10e1df934eb 100644 --- a/src/print.c +++ b/src/print.c @@ -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 @@ void print_interval (); #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 @@ print_unwind (saved_text) Lisp_Object saved_text; { bcopy (XSTRING (saved_text)->data, print_buffer, XSTRING (saved_text)->size); + return Qnil; } @@ -1186,6 +1187,10 @@ print_preprocess (obj) size = XVECTOR (obj)->size & PSEUDOVECTOR_SIZE_MASK; for (i = 0; i < size; i++) print_preprocess (XVECTOR (obj)->contents[i]); + break; + + default: + break; } } } |