Contents in latest XEmacs 21.2 at 1999-06-24-19.

[chise/xemacs-chise.git.1] / src / console.c

diff --git a/src/console.c b/src/console.c
index 550e5f8..7e27f86 100644 (file)
--- a/src/console.c
+++ b/src/console.c
@@ -137,14 +137,14 @@ print_console (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag)
 }
 
 DEFINE_LRECORD_IMPLEMENTATION ("console", console,
-                              mark_console, print_console, 0, 0, 0,
+                              mark_console, print_console, 0, 0, 0, 0,
                               struct console);
 \f
 static struct console *
 allocate_console (void)
 {
   Lisp_Object console;
-  struct console *con = alloc_lcrecord_type (struct console, lrecord_console);
+  struct console *con = alloc_lcrecord_type (struct console, &lrecord_console);
   struct gcpro gcpro1;
 
   copy_lcrecord (con, XCONSOLE (Vconsole_defaults));
@@ -1195,8 +1195,8 @@ complex_vars_of_console (void)
   /* Make sure all markable slots in console_defaults
      are initialized reasonably, so mark_console won't choke.
    */
-  struct console *defs = alloc_lcrecord_type (struct console, lrecord_console);
-  struct console *syms = alloc_lcrecord_type (struct console, lrecord_console);
+  struct console *defs = alloc_lcrecord_type (struct console, &lrecord_console);
+  struct console *syms = alloc_lcrecord_type (struct console, &lrecord_console);
 
   staticpro (&Vconsole_defaults);
   staticpro (&Vconsole_local_symbols);