(struct terminal): Move all Lisp_Object fields traced by

the GC to the beginning.

2 files changed, 9 insertions, 3 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 20bc0a38762..f6e21a6f4b1 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2007-09-27  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+        * termhooks.h (struct terminal): Move all Lisp_Object fields traced by
+        the GC to the beginning.
+
         * indent.h:
         * indent.c: Use EMACS_INT for ints coming from Elisp data.
 
diff --git a/src/termhooks.h b/src/termhooks.h
index 8cb1194dc07..3368c906a2d 100644
--- a/src/termhooks.h
+++ b/src/termhooks.h
@@ -320,6 +320,12 @@ struct terminal
   EMACS_INT size;
   struct Lisp_Vector *vec_next;
 
+  /* Parameter alist of this terminal.  */
+  Lisp_Object param_alist;
+
+  /* All fields before `next_terminal' should be Lisp_Object and are traced
+     by the GC.  All fields afterwards are ignored by the GC.  */
+  
   /* Chain of all terminal devices. */
   struct terminal *next_terminal;
 
@@ -363,9 +369,6 @@ struct terminal
      the function `set-keyboard-coding-system'.  */
   struct coding_system *keyboard_coding;
 
-  /* Parameter alist of this terminal.  */
-  Lisp_Object param_alist;
-  
   /* Terminal characteristics. */
   /* XXX Are these really used on non-termcap displays? */