aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/print.c21
1 files changed, 15 insertions, 6 deletions
diff --git a/src/print.c b/src/print.c
index dca5a07d791..73535550bbf 100644
--- a/src/print.c
+++ b/src/print.c
@@ -63,11 +63,19 @@ static Lisp_Object being_printed[PRINT_CIRCLE];
63/* Last char printed to stdout by printchar. */ 63/* Last char printed to stdout by printchar. */
64static unsigned int printchar_stdout_last; 64static unsigned int printchar_stdout_last;
65 65
66struct print_buffer { 66struct print_buffer
67 char *buffer; /* Allocated buffer. */ 67{
68 ptrdiff_t size; /* Size of allocated buffer. */ 68 /* Allocated buffer. */
69 ptrdiff_t pos; /* Chars stored in buffer. */ 69 char *buffer;
70 ptrdiff_t pos_byte; /* Bytes stored in buffer. */ 70
71 /* Size of allocated buffer. */
72 ptrdiff_t size;
73
74 /* Chars stored in buffer. */
75 ptrdiff_t pos;
76
77 /* Bytes stored in buffer. */
78 ptrdiff_t pos_byte;
71}; 79};
72 80
73/* When printing into a buffer, first we put the text in this 81/* When printing into a buffer, first we put the text in this
@@ -114,7 +122,8 @@ print_unwind (Lisp_Object saved_text)
114 block of characters. */ 122 block of characters. */
115 123
116/* State carried between print_prepare and print_finish. */ 124/* State carried between print_prepare and print_finish. */
117struct print_context { 125struct print_context
126{
118 Lisp_Object printcharfun; 127 Lisp_Object printcharfun;
119 Lisp_Object old_printcharfun; 128 Lisp_Object old_printcharfun;
120 ptrdiff_t old_point, start_point; 129 ptrdiff_t old_point, start_point;