# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 885712849 0
# Node ID 6ebcbdec2e07fdc979fa4911fd20948d2f65081d
# Parent  ad6c6f1bd6749fa84e36b9131f95aa065c2d2466
Comment change.

diff -r ad6c6f1bd674 -r 6ebcbdec2e07 src/alloc.c
--- a/src/alloc.c	Sun Jan 25 01:57:08 1998 +0000
+++ b/src/alloc.c	Sun Jan 25 07:20:49 1998 +0000
@@ -2006,6 +2006,9 @@
 	mark_object (&ptr->plist);
 	XSETTYPE (*(Lisp_Object *) &ptr->name, Lisp_String);
 	mark_object (&ptr->name);
+	/* Note that we do not mark the obarray of the symbol.
+	   It is safe not to do so because nothing accesses that
+	   slot except to check whether it is nil.  */
 	ptr = ptr->next;
 	if (ptr)
 	  {