comparison src/w32fns.c @ 45454:3244cd2850b8

* w32fns.c (enum_font_maybe_add_to_list): Use XCDR_AS_LVALUE for now, when the address is needed.
author Ken Raeburn <raeburn@raeburn.org>
date Tue, 21 May 2002 21:35:41 +0000
parents 33a7c706dc9c
children 84120e75baa0
comparison
equal deleted inserted replaced
45453:05d77f58ead5 45454:3244cd2850b8
7250 bold and italic versions of the font. */ 7250 bold and italic versions of the font. */
7251 Lisp_Object font_name = build_string (buf); 7251 Lisp_Object font_name = build_string (buf);
7252 if (NILP (Fmember (font_name, lpef->list))) 7252 if (NILP (Fmember (font_name, lpef->list)))
7253 { 7253 {
7254 *lpef->tail = Fcons (Fcons (build_string (buf), width), Qnil); 7254 *lpef->tail = Fcons (Fcons (build_string (buf), width), Qnil);
7255 lpef->tail = &(XCDR (*lpef->tail)); 7255 lpef->tail = &(XCDR_AS_LVALUE (*lpef->tail));
7256 lpef->numFonts++; 7256 lpef->numFonts++;
7257 } 7257 }
7258 } 7258 }
7259 } 7259 }
7260 7260