comparison src/xdisp.c @ 62938:3c0952cf4004

(note_mode_line_or_margin_highlight): Lisp_Object/int mixup.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 31 May 2005 21:54:52 +0000
parents 4929fb0b87a7
children b5b6bc3bd36b
comparison
equal deleted inserted replaced
62937:23f332ae21c8 62938:3c0952cf4004
21486 The displayed string is the flatten string. */ 21486 The displayed string is the flatten string. */
21487 for (tmp_glyph = glyph - 1, gpos = 0; 21487 for (tmp_glyph = glyph - 1, gpos = 0;
21488 tmp_glyph->charpos >= XINT (b); 21488 tmp_glyph->charpos >= XINT (b);
21489 tmp_glyph--, gpos++) 21489 tmp_glyph--, gpos++)
21490 { 21490 {
21491 if (tmp_glyph->object != glyph->object) 21491 if (!EQ (tmp_glyph->object, glyph->object))
21492 break; 21492 break;
21493 } 21493 }
21494 21494
21495 /* Calculate the lenght(glyph sequence length: GSEQ_LENGTH) of 21495 /* Calculate the lenght(glyph sequence length: GSEQ_LENGTH) of
21496 displayed string holding GLYPH. 21496 displayed string holding GLYPH.
21499 SCHARS (STRING) returns the length of the internal string. */ 21499 SCHARS (STRING) returns the length of the internal string. */
21500 for (tmp_glyph = glyph, gseq_length = gpos; 21500 for (tmp_glyph = glyph, gseq_length = gpos;
21501 tmp_glyph->charpos < XINT (e); 21501 tmp_glyph->charpos < XINT (e);
21502 tmp_glyph++, gseq_length++) 21502 tmp_glyph++, gseq_length++)
21503 { 21503 {
21504 if (tmp_glyph->object != glyph->object) 21504 if (!EQ (tmp_glyph->object, glyph->object))
21505 break; 21505 break;
21506 } 21506 }
21507 21507
21508 total_pixel_width = 0; 21508 total_pixel_width = 0;
21509 for (tmp_glyph = glyph - gpos; tmp_glyph != glyph; tmp_glyph++) 21509 for (tmp_glyph = glyph - gpos; tmp_glyph != glyph; tmp_glyph++)