aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndreas Schwab2006-09-14 13:12:15 +0000
committerAndreas Schwab2006-09-14 13:12:15 +0000
commitcd3587c125d58310bc11bebf32541048eea11c0b (patch)
tree8df1f153275fcbc48f441c5171bc45c9e82f3a7d
parent2a8edf31ec2558f7e9899e6089dad31df257195f (diff)
downloademacs-cd3587c125d58310bc11bebf32541048eea11c0b.tar.gz
emacs-cd3587c125d58310bc11bebf32541048eea11c0b.zip
Whitespace fixup.
-rw-r--r--src/ChangeLog4
-rw-r--r--src/print.c20
2 files changed, 14 insertions, 10 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 36c5a9c934b..c2958531df2 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
12006-09-14 Andreas Schwab <schwab@suse.de>
2
3 * print.c: Whitespace fixup.
4
12006-09-14 Kim F. Storm <storm@cua.dk> 52006-09-14 Kim F. Storm <storm@cua.dk>
2 6
3 * xdisp.c (produce_image_glyph): Automatically crop wide images at 7 * xdisp.c (produce_image_glyph): Automatically crop wide images at
diff --git a/src/print.c b/src/print.c
index 57f83cae696..c81f99f6436 100644
--- a/src/print.c
+++ b/src/print.c
@@ -216,7 +216,7 @@ int print_output_debug_flag = 1;
216 if (MARKERP (printcharfun)) \ 216 if (MARKERP (printcharfun)) \
217 { \ 217 { \
218 EMACS_INT marker_pos; \ 218 EMACS_INT marker_pos; \
219 if (!(XMARKER (printcharfun)->buffer)) \ 219 if (! XMARKER (printcharfun)->buffer) \
220 error ("Marker does not point anywhere"); \ 220 error ("Marker does not point anywhere"); \
221 if (XMARKER (printcharfun)->buffer != current_buffer) \ 221 if (XMARKER (printcharfun)->buffer != current_buffer) \
222 set_buffer_internal (XMARKER (printcharfun)->buffer); \ 222 set_buffer_internal (XMARKER (printcharfun)->buffer); \
@@ -289,7 +289,7 @@ int print_output_debug_flag = 1;
289 SET_PT_BOTH (old_point + (old_point >= start_point \ 289 SET_PT_BOTH (old_point + (old_point >= start_point \
290 ? PT - start_point : 0), \ 290 ? PT - start_point : 0), \
291 old_point_byte + (old_point_byte >= start_point_byte \ 291 old_point_byte + (old_point_byte >= start_point_byte \
292 ? PT_BYTE - start_point_byte : 0)); \ 292 ? PT_BYTE - start_point_byte : 0)); \
293 if (old != current_buffer) \ 293 if (old != current_buffer) \
294 set_buffer_internal (old); 294 set_buffer_internal (old);
295 295
@@ -956,7 +956,7 @@ debug_output_compilation_hack (x)
956 print_output_debug_flag = x; 956 print_output_debug_flag = x;
957} 957}
958 958
959#if defined(GNU_LINUX) 959#if defined (GNU_LINUX)
960 960
961/* This functionality is not vitally important in general, so we rely on 961/* This functionality is not vitally important in general, so we rely on
962 non-portable ability to use stderr as lvalue. */ 962 non-portable ability to use stderr as lvalue. */
@@ -976,7 +976,7 @@ append to existing target file. */)
976 Lisp_Object file, append; 976 Lisp_Object file, append;
977{ 977{
978 if (initial_stderr_stream != NULL) 978 if (initial_stderr_stream != NULL)
979 fclose(stderr); 979 fclose (stderr);
980 stderr = initial_stderr_stream; 980 stderr = initial_stderr_stream;
981 initial_stderr_stream = NULL; 981 initial_stderr_stream = NULL;
982 982
@@ -984,7 +984,7 @@ append to existing target file. */)
984 { 984 {
985 file = Fexpand_file_name (file, Qnil); 985 file = Fexpand_file_name (file, Qnil);
986 initial_stderr_stream = stderr; 986 initial_stderr_stream = stderr;
987 stderr = fopen(SDATA (file), NILP (append) ? "w" : "a"); 987 stderr = fopen (SDATA (file), NILP (append) ? "w" : "a");
988 if (stderr == NULL) 988 if (stderr == NULL)
989 { 989 {
990 stderr = initial_stderr_stream; 990 stderr = initial_stderr_stream;
@@ -2052,7 +2052,7 @@ print_object (obj, printcharfun, escapeflag)
2052 /* Do you think this is necessary? */ 2052 /* Do you think this is necessary? */
2053 if (XMARKER (obj)->insertion_type != 0) 2053 if (XMARKER (obj)->insertion_type != 0)
2054 strout ("(moves after insertion) ", -1, -1, printcharfun, 0); 2054 strout ("(moves after insertion) ", -1, -1, printcharfun, 0);
2055 if (!(XMARKER (obj)->buffer)) 2055 if (! XMARKER (obj)->buffer)
2056 strout ("in no buffer", -1, -1, printcharfun, 0); 2056 strout ("in no buffer", -1, -1, printcharfun, 0);
2057 else 2057 else
2058 { 2058 {
@@ -2066,7 +2066,7 @@ print_object (obj, printcharfun, escapeflag)
2066 2066
2067 case Lisp_Misc_Overlay: 2067 case Lisp_Misc_Overlay:
2068 strout ("#<overlay ", -1, -1, printcharfun, 0); 2068 strout ("#<overlay ", -1, -1, printcharfun, 0);
2069 if (!(XMARKER (OVERLAY_START (obj))->buffer)) 2069 if (! XMARKER (OVERLAY_START (obj))->buffer)
2070 strout ("in no buffer", -1, -1, printcharfun, 0); 2070 strout ("in no buffer", -1, -1, printcharfun, 0);
2071 else 2071 else
2072 { 2072 {
@@ -2113,8 +2113,8 @@ print_object (obj, printcharfun, escapeflag)
2113 2113
2114 case Lisp_Misc_Kboard_Objfwd: 2114 case Lisp_Misc_Kboard_Objfwd:
2115 strout ("#<kboard_objfwd to ", -1, -1, printcharfun, 0); 2115 strout ("#<kboard_objfwd to ", -1, -1, printcharfun, 0);
2116 print_object (*(Lisp_Object *)((char *) current_kboard 2116 print_object (*(Lisp_Object *) ((char *) current_kboard
2117 + XKBOARD_OBJFWD (obj)->offset), 2117 + XKBOARD_OBJFWD (obj)->offset),
2118 printcharfun, escapeflag); 2118 printcharfun, escapeflag);
2119 PRINTCHAR ('>'); 2119 PRINTCHAR ('>');
2120 break; 2120 break;
@@ -2200,7 +2200,7 @@ print_interval (interval, printcharfun)
2200 print_object (make_number (interval->position), printcharfun, 1); 2200 print_object (make_number (interval->position), printcharfun, 1);
2201 PRINTCHAR (' '); 2201 PRINTCHAR (' ');
2202 print_object (make_number (interval->position + LENGTH (interval)), 2202 print_object (make_number (interval->position + LENGTH (interval)),
2203 printcharfun, 1); 2203 printcharfun, 1);
2204 PRINTCHAR (' '); 2204 PRINTCHAR (' ');
2205 print_object (interval->plist, printcharfun, 1); 2205 print_object (interval->plist, printcharfun, 1);
2206} 2206}