Mercurial > hg > xemacs-beta

diff src/console.c @ 3092:141c2920ea48

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2005-11-25 01:41:31 by crestani] Incremental Garbage Collector
author crestani
date Fri, 25 Nov 2005 01:42:08 +0000
parents facf3239ba30
children 7c45a748ff54
line wrap: on
line diff
--- a/src/console.c	Thu Nov 24 22:51:25 2005 +0000
+++ b/src/console.c	Fri Nov 25 01:42:08 2005 +0000
@@ -115,9 +115,17 @@
 
 static const struct memory_description console_data_description_1 []= {
 #ifdef HAVE_TTY
+#ifdef NEW_GC
+  { XD_LISP_OBJECT, tty_console },
+#else /* not NEW_GC */
   { XD_BLOCK_PTR, tty_console, 1, { &tty_console_data_description} },
+#endif /* not NEW_GC */
 #endif
+#ifdef NEW_GC
+  { XD_LISP_OBJECT, stream_console },
+#else /* not NEW_GC */
   { XD_BLOCK_PTR, stream_console, 1, { &stream_console_data_description} },
+#endif /* not NEW_GC */
   { XD_END }
 };
 
@@ -1189,6 +1197,12 @@
 syms_of_console (void)
 {
   INIT_LRECORD_IMPLEMENTATION (console);
+#ifdef NEW_GC
+#ifdef HAVE_TTY
+  INIT_LRECORD_IMPLEMENTATION (tty_console);
+#endif
+  INIT_LRECORD_IMPLEMENTATION (stream_console);
+#endif /* not NEW_GC */
 
   DEFSUBR (Fvalid_console_type_p);
   DEFSUBR (Fconsole_type_list);