Mercurial > hg > xemacs-beta

comparison src/console.c @ 2551:9f70af3ac939

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2005-02-03 16:14:02 by james] Commit Olivier Galibert's dumper updates for bignums and use them. See xemacs-patches message with ID <ps8y685c6p.fsf@diannao.ittc.ku.edu>.
author james
date Thu, 03 Feb 2005 16:14:08 +0000
parents 3d8143fc88e1
children 6fa9919a9a0b
comparison
equal deleted inserted replaced
2550:317f30471f4e 2551:9f70af3ac939
113 113
114 114
115 115
116 static const struct memory_description console_data_description_1 []= { 116 static const struct memory_description console_data_description_1 []= {
117 #ifdef HAVE_TTY 117 #ifdef HAVE_TTY
118 { XD_BLOCK_PTR, tty_console, 1, &tty_console_data_description}, 118 { XD_BLOCK_PTR, tty_console, 1, { &tty_console_data_description} },
119 #endif 119 #endif
120 { XD_BLOCK_PTR, stream_console, 1, &stream_console_data_description}, 120 { XD_BLOCK_PTR, stream_console, 1, { &stream_console_data_description} },
121 { XD_END } 121 { XD_END }
122 }; 122 };
123 123
124 static const struct sized_memory_description console_data_description = { 124 static const struct sized_memory_description console_data_description = {
125 sizeof (void *), console_data_description_1 125 sizeof (void *), console_data_description_1
128 static const struct memory_description console_description [] = { 128 static const struct memory_description console_description [] = {
129 { XD_INT, offsetof (struct console, contype) }, 129 { XD_INT, offsetof (struct console, contype) },
130 #define MARKED_SLOT(x) { XD_LISP_OBJECT, offsetof (struct console, x) }, 130 #define MARKED_SLOT(x) { XD_LISP_OBJECT, offsetof (struct console, x) },
131 #include "conslots.h" 131 #include "conslots.h"
132 { XD_BLOCK_PTR, offsetof (struct console, conmeths), 1, 132 { XD_BLOCK_PTR, offsetof (struct console, conmeths), 1,
133 &console_methods_description }, 133 { &console_methods_description } },
134 { XD_UNION, offsetof (struct console, console_data), 134 { XD_UNION, offsetof (struct console, console_data),
135 XD_INDIRECT (0, 0), &console_data_description }, 135 XD_INDIRECT (0, 0), { &console_data_description } },
136 { XD_END } 136 { XD_END }
137 }; 137 };
138 138
139 static Lisp_Object 139 static Lisp_Object
140 mark_console (Lisp_Object obj) 140 mark_console (Lisp_Object obj)
1225 DEFSYMBOL (Qsuspend_resume_hook); 1225 DEFSYMBOL (Qsuspend_resume_hook);
1226 } 1226 }
1227 1227
1228 static const struct memory_description cte_description_1[] = { 1228 static const struct memory_description cte_description_1[] = {
1229 { XD_LISP_OBJECT, offsetof (console_type_entry, symbol) }, 1229 { XD_LISP_OBJECT, offsetof (console_type_entry, symbol) },
1230 { XD_BLOCK_PTR, offsetof (console_type_entry, meths), 1, &console_methods_description }, 1230 { XD_BLOCK_PTR, offsetof (console_type_entry, meths), 1,
1231 { &console_methods_description } },
1231 { XD_END } 1232 { XD_END }
1232 }; 1233 };
1233 1234
1234 static const struct sized_memory_description cte_description = { 1235 static const struct sized_memory_description cte_description = {
1235 sizeof (console_type_entry), 1236 sizeof (console_type_entry),