mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-26 23:31:55 -08:00
(mark_glyph_matrix): Mark strings only.
This commit is contained in:
parent
d9138d5de0
commit
3770920e08
1 changed files with 3 additions and 6 deletions
|
|
@ -2031,7 +2031,8 @@ clear_marks ()
|
|||
}
|
||||
#endif
|
||||
|
||||
/* Mark Lisp objects in glyph matrix MATRIX. */
|
||||
/* Mark Lisp objects in glyph matrix MATRIX. Currently the
|
||||
only interesting objects referenced from glyphs are strings. */
|
||||
|
||||
static void
|
||||
mark_glyph_matrix (matrix)
|
||||
|
|
@ -2052,11 +2053,7 @@ mark_glyph_matrix (matrix)
|
|||
|
||||
while (glyph < end_glyph)
|
||||
{
|
||||
if (/* OBJECT Is zero for face extending glyphs, padding
|
||||
spaces and such. */
|
||||
glyph->object
|
||||
/* Marking the buffer itself should not be necessary. */
|
||||
&& !BUFFERP (glyph->object))
|
||||
if (GC_STRINGP (glyph->object))
|
||||
mark_object (&glyph->object);
|
||||
++glyph;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue