* w32fns.c (enum_font_maybe_add_to_list): Use XCDR_AS_LVALUE for

now, when the address is needed.
This commit is contained in:
Ken Raeburn 2002-05-21 21:35:49 +00:00
parent 171a7d5d7c
commit 1b65564c09
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2002-05-21 Ken Raeburn <raeburn@gnu.org>
* w32fns.c (enum_font_maybe_add_to_list): Use XCDR_AS_LVALUE for
now, when the address is needed.
2002-05-21 Colin Walters <walters@gnu.org>
* Makefile.in (shortlisp): Add font-core.el.

View file

@ -7252,7 +7252,7 @@ enum_font_maybe_add_to_list (lpef, logfont, match_charset, width)
if (NILP (Fmember (font_name, lpef->list)))
{
*lpef->tail = Fcons (Fcons (build_string (buf), width), Qnil);
lpef->tail = &(XCDR (*lpef->tail));
lpef->tail = &(XCDR_AS_LVALUE (*lpef->tail));
lpef->numFonts++;
}
}