diff src/alloc.c @ 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 67bfadf24043
children 2b07af77d7ec
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)
 	  {