changeset 1114:903883eed4de

* alloc.c (mark_object): mark a symbol's name after marking its value, function, and property list rather than before; this way, symbols' names are readable, giving us a chance to detect some kinds of heap corruption.
author Jim Blandy <jimb@redhat.com>
date Sun, 13 Sep 1992 12:14:54 +0000
parents 0ffcf74fb8ad
children eb7f1ab33a9d
files src/alloc.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/alloc.c	Sun Sep 13 11:44:06 1992 +0000
+++ b/src/alloc.c	Sun Sep 13 12:14:54 1992 +0000
@@ -1378,11 +1378,11 @@
 
 	if (XMARKBIT (ptr->plist)) break;
 	XMARK (ptr->plist);
-	XSETTYPE (*(Lisp_Object *) &ptr->name, Lisp_String);
-	mark_object (&ptr->name);
 	mark_object ((Lisp_Object *) &ptr->value);
 	mark_object (&ptr->function);
 	mark_object (&ptr->plist);
+	XSETTYPE (*(Lisp_Object *) &ptr->name, Lisp_String);
+	mark_object (&ptr->name);
 	ptr = ptr->next;
 	if (ptr)
 	  {