Mercurial > emacs
comparison src/alloc.c @ 20768:6ebcbdec2e07
Comment change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 25 Jan 1998 07:20:49 +0000 |
| parents | ed9ed828415e |
| children | 3b2f72ed135c |
comparison
equal
deleted
inserted
replaced
| 20767:ad6c6f1bd674 | 20768:6ebcbdec2e07 |
|---|---|
| 2004 mark_object ((Lisp_Object *) &ptr->value); | 2004 mark_object ((Lisp_Object *) &ptr->value); |
| 2005 mark_object (&ptr->function); | 2005 mark_object (&ptr->function); |
| 2006 mark_object (&ptr->plist); | 2006 mark_object (&ptr->plist); |
| 2007 XSETTYPE (*(Lisp_Object *) &ptr->name, Lisp_String); | 2007 XSETTYPE (*(Lisp_Object *) &ptr->name, Lisp_String); |
| 2008 mark_object (&ptr->name); | 2008 mark_object (&ptr->name); |
| 2009 /* Note that we do not mark the obarray of the symbol. | |
| 2010 It is safe not to do so because nothing accesses that | |
| 2011 slot except to check whether it is nil. */ | |
| 2009 ptr = ptr->next; | 2012 ptr = ptr->next; |
| 2010 if (ptr) | 2013 if (ptr) |
| 2011 { | 2014 { |
| 2012 /* For the benefit of the last_marked log. */ | 2015 /* For the benefit of the last_marked log. */ |
| 2013 objptr = (Lisp_Object *)&XSYMBOL (obj)->next; | 2016 objptr = (Lisp_Object *)&XSYMBOL (obj)->next; |
