Mercurial > emacs
comparison src/xfaces.c @ 28237:2f636fd2f714
(check_lface_attrs) [GLYPH_DEBUG]: Fix syntax error.
(lface_fully_specified_p): Don't check contents of
LFACE_FONT_INDEX because that attribute is optional.
(realize_x_face): Remove now unwarranted xassert.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Tue, 21 Mar 2000 16:12:22 +0000 |
parents | 8e330f701881 |
children | 73181b84ea57 |
comparison
equal
deleted
inserted
replaced
28236:ad471f641f39 | 28237:2f636fd2f714 |
---|---|
2709 #ifdef HAVE_WINDOW_SYSTEM | 2709 #ifdef HAVE_WINDOW_SYSTEM |
2710 xassert (UNSPECIFIEDP (attrs[LFACE_STIPPLE_INDEX]) | 2710 xassert (UNSPECIFIEDP (attrs[LFACE_STIPPLE_INDEX]) |
2711 || SYMBOLP (attrs[LFACE_STIPPLE_INDEX]) | 2711 || SYMBOLP (attrs[LFACE_STIPPLE_INDEX]) |
2712 || !NILP (Fbitmap_spec_p (attrs[LFACE_STIPPLE_INDEX]))); | 2712 || !NILP (Fbitmap_spec_p (attrs[LFACE_STIPPLE_INDEX]))); |
2713 xassert (UNSPECIFIEDP (attrs[LFACE_FONT_INDEX]) | 2713 xassert (UNSPECIFIEDP (attrs[LFACE_FONT_INDEX]) |
2714 || NILP (attr[LFACE_FONT_INDEX])); | 2714 || NILP (attrs[LFACE_FONT_INDEX]) |
2715 || STRINGP (attr[LFACE_FONT_INDEX])); | 2715 || STRINGP (attrs[LFACE_FONT_INDEX])); |
2716 #endif | 2716 #endif |
2717 } | 2717 } |
2718 | 2718 |
2719 | 2719 |
2720 /* Check consistency of attributes of Lisp face LFACE (a Lisp vector). */ | 2720 /* Check consistency of attributes of Lisp face LFACE (a Lisp vector). */ |
2836 Lisp_Object *attrs; | 2836 Lisp_Object *attrs; |
2837 { | 2837 { |
2838 int i; | 2838 int i; |
2839 | 2839 |
2840 for (i = 1; i < LFACE_VECTOR_SIZE; ++i) | 2840 for (i = 1; i < LFACE_VECTOR_SIZE; ++i) |
2841 if (UNSPECIFIEDP (attrs[i])) | 2841 if (UNSPECIFIEDP (attrs[i]) && i != LFACE_FONT_INDEX) |
2842 break; | 2842 break; |
2843 | 2843 |
2844 return i == LFACE_VECTOR_SIZE; | 2844 return i == LFACE_VECTOR_SIZE; |
2845 } | 2845 } |
2846 | 2846 |
5933 | 5933 |
5934 stipple = attrs[LFACE_STIPPLE_INDEX]; | 5934 stipple = attrs[LFACE_STIPPLE_INDEX]; |
5935 if (!NILP (stipple)) | 5935 if (!NILP (stipple)) |
5936 face->stipple = load_pixmap (f, stipple, &face->pixmap_w, &face->pixmap_h); | 5936 face->stipple = load_pixmap (f, stipple, &face->pixmap_w, &face->pixmap_h); |
5937 | 5937 |
5938 xassert (face->fontset < 0); | |
5939 xassert (FACE_SUITABLE_FOR_CHAR_P (face, c)); | 5938 xassert (FACE_SUITABLE_FOR_CHAR_P (face, c)); |
5940 return face; | 5939 return face; |
5941 #endif /* HAVE_WINDOW_SYSTEM */ | 5940 #endif /* HAVE_WINDOW_SYSTEM */ |
5942 } | 5941 } |
5943 | 5942 |