comparison src/font.c @ 94968:e87ef440216b

(font_clear_cache): Check if the cached vector of entities is nil or not.
author Kenichi Handa <handa@m17n.org>
date Wed, 14 May 2008 12:27:59 +0000
parents 5ffc88767cc1
children 125a7ecf00db
comparison
equal deleted inserted replaced
94967:ed0e1a85ef56 94968:e87ef440216b
2235 2235
2236 /* CACHE = (DRIVER-TYPE NUM-FRAMES FONT-CACHE-DATA ...) */ 2236 /* CACHE = (DRIVER-TYPE NUM-FRAMES FONT-CACHE-DATA ...) */
2237 for (tail = XCDR (XCDR (cache)); CONSP (tail); tail = XCDR (tail)) 2237 for (tail = XCDR (XCDR (cache)); CONSP (tail); tail = XCDR (tail))
2238 { 2238 {
2239 elt = XCAR (tail); 2239 elt = XCAR (tail);
2240 if (CONSP (elt) && FONT_SPEC_P (XCAR (elt))) 2240 if (CONSP (elt) && FONT_SPEC_P (XCAR (elt)) && VECTORP (XCDR (elt)))
2241 { 2241 {
2242 Lisp_Object vec = XCDR (elt); 2242 Lisp_Object vec = XCDR (elt);
2243 int i; 2243 int i;
2244 2244
2245 for (i = 0; i < ASIZE (vec); i++) 2245 for (i = 0; i < ASIZE (vec); i++)