1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-08 04:30:45 -08:00

(dumpglyphs): Declare local variable first_ch as Lisp_Object, not int.

This commit is contained in:
Richard M. Stallman 1997-07-12 06:35:22 +00:00
parent 2f69f2ec36
commit b264791c6b

View file

@ -557,7 +557,8 @@ dumpglyphs (f, left, top, gp, n, hl, just_foreground, cmpcharp)
/* Get the face-code of the next GLYPH. */
int cf, len;
GLYPH g = *gp;
int ch, first_ch, charset;
int ch, charset;
Lisp_Object first_ch;
/* HIGHEST and LOWEST are used while drawing a composite
character. The meanings are described later. */
int highest, lowest;
@ -565,7 +566,7 @@ dumpglyphs (f, left, top, gp, n, hl, just_foreground, cmpcharp)
GLYPH_FOLLOW_ALIASES (tbase, tlen, g);
cf = (cmpcharp ? cmpcharp->face_work : FAST_GLYPH_FACE (g));
ch = FAST_GLYPH_CHAR (g);
if (gidx == 0) first_ch = ch;
if (gidx == 0) XSETFASTINT (first_ch, ch);
charset = CHAR_CHARSET (ch);
if (charset == CHARSET_COMPOSITION)
{