Mercurial > emacs
annotate src/dispextern.h @ 38588:08a4c6c00af0
(init_from_display_pos): If POS is in an overlay string,
deal with the first overlay string having an image `display'
property.
(try_window_reusing_current_matrix, compute_line_metrics): Fix
computation of row's visible height for the case that part of the
row is invisible above and part of the row is at the same time
invisible below the window.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Fri, 27 Jul 2001 15:29:16 +0000 |
parents | f909f7fe9a65 |
children | 30acd3a34723 |
rev | line source |
---|---|
247 | 1 /* Interface definitions for display code. |
35732
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2 Copyright (C) 1985, 1993, 1994, 1997, 1998, 1999, 2000, 2001 |
25012 | 3 Free Software Foundation, Inc. |
247 | 4 |
5 This file is part of GNU Emacs. | |
6 | |
7 GNU Emacs is free software; you can redistribute it and/or modify | |
8 it under the terms of the GNU General Public License as published by | |
732 | 9 the Free Software Foundation; either version 2, or (at your option) |
247 | 10 any later version. |
11 | |
12 GNU Emacs is distributed in the hope that it will be useful, | |
13 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 GNU General Public License for more details. | |
16 | |
17 You should have received a copy of the GNU General Public License | |
18 along with GNU Emacs; see the file COPYING. If not, write to | |
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
13407
diff
changeset
|
19 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
13407
diff
changeset
|
20 Boston, MA 02111-1307, USA. */ |
247 | 21 |
34226
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
22 /* New redisplay written by Gerd Moellmann <gerd@gnu.org>. */ |
25012 | 23 |
24 #ifndef DISPEXTERN_H_INCLUDED | |
25 #define DISPEXTERN_H_INCLUDED | |
247 | 26 |
27 #ifdef HAVE_X_WINDOWS | |
1409
7fd1c810daca
* dispextern.h: New element of frame structure `max_ascent'.
Joseph Arceneaux <jla@gnu.org>
parents:
764
diff
changeset
|
28 #include <X11/Xlib.h> |
25881
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
29 #ifdef USE_X_TOOLKIT |
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
30 #include <X11/Intrinsic.h> |
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
31 #endif /* USE_X_TOOLKIT */ |
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
32 #endif /* HAVE_X_WINDOWS */ |
1409
7fd1c810daca
* dispextern.h: New element of frame structure `max_ascent'.
Joseph Arceneaux <jla@gnu.org>
parents:
764
diff
changeset
|
33 |
9572 | 34 #ifdef MSDOS |
35 #include "msdos.h" | |
36 #endif | |
37 | |
13407
5ebb99bc06bb
[HAVE_NTGUI]: Include win32.h.
Geoff Voelker <voelker@cs.washington.edu>
parents:
9572
diff
changeset
|
38 #ifdef HAVE_NTGUI |
16887
dd6cbc8b53e8
Use new name w32gui.h
Geoff Voelker <voelker@cs.washington.edu>
parents:
16051
diff
changeset
|
39 #include "w32gui.h" |
13407
5ebb99bc06bb
[HAVE_NTGUI]: Include win32.h.
Geoff Voelker <voelker@cs.washington.edu>
parents:
9572
diff
changeset
|
40 #endif |
5ebb99bc06bb
[HAVE_NTGUI]: Include win32.h.
Geoff Voelker <voelker@cs.washington.edu>
parents:
9572
diff
changeset
|
41 |
25520
e4c237a5a833
[macintosh]: Include macterm.h to define substitute X
Richard M. Stallman <rms@gnu.org>
parents:
25513
diff
changeset
|
42 #ifdef macintosh |
32752
923b8d6d8277
Initial check-in: changes for building Emacs under Mac OS.
Andrew Choi <akochoi@shaw.ca>
parents:
32543
diff
changeset
|
43 #include "macgui.h" |
25520
e4c237a5a833
[macintosh]: Include macterm.h to define substitute X
Richard M. Stallman <rms@gnu.org>
parents:
25513
diff
changeset
|
44 #endif |
25012 | 45 |
46 /* Structure forward declarations. Some are here because function | |
47 prototypes below reference structure types before their definition | |
48 in this file. Some are here because not every file including | |
49 dispextern.h also includes frame.h and windows.h. */ | |
50 | |
51 struct glyph; | |
52 struct glyph_row; | |
53 struct glyph_matrix; | |
54 struct glyph_pool; | |
55 struct frame; | |
56 struct window; | |
57 | |
58 | |
59 | |
60 /*********************************************************************** | |
61 Debugging | |
62 ***********************************************************************/ | |
63 | |
64 /* If GLYPH_DEBUG is non-zero, additional checks are activated. Turn | |
65 it off by defining the macro GLYPH_DEBUG to zero. */ | |
66 | |
67 #ifndef GLYPH_DEBUG | |
68 #define GLYPH_DEBUG 0 | |
69 #endif | |
70 | |
71 /* Macros to include code only if GLYPH_DEBUG != 0. */ | |
72 | |
73 #if GLYPH_DEBUG | |
74 #define IF_DEBUG(X) X | |
25708
a6aabf050a60
Add prototypes for gamma_correct and
Gerd Moellmann <gerd@gnu.org>
parents:
25655
diff
changeset
|
75 #define xassert(X) do {if (!(X)) abort ();} while (0) |
25012 | 76 #else |
77 #define IF_DEBUG(X) (void) 0 | |
78 #define xassert(X) (void) 0 | |
79 #endif | |
80 | |
81 /* Macro for displaying traces of redisplay. If Emacs was compiled | |
82 with GLYPH_DEBUG != 0, the variable trace_redisplay_p can be set to | |
83 a non-zero value in debugging sessions to activate traces. */ | |
84 | |
85 #if GLYPH_DEBUG | |
86 | |
87 extern int trace_redisplay_p; | |
88 #include <stdio.h> | |
89 | |
90 #define TRACE(X) \ | |
91 if (trace_redisplay_p) \ | |
92 fprintf X; \ | |
93 else \ | |
94 (void) 0 | |
95 | |
96 #else /* GLYPH_DEBUG == 0 */ | |
97 | |
98 #define TRACE(X) (void) 0 | |
99 | |
100 #endif /* GLYPH_DEBUG == 0 */ | |
101 | |
102 | |
103 | |
104 /*********************************************************************** | |
105 Text positions | |
106 ***********************************************************************/ | |
107 | |
108 /* Starting with Emacs 20.3, characters from strings and buffers have | |
109 both a character and a byte position associated with them. The | |
110 following structure holds such a pair of positions. */ | |
111 | |
112 struct text_pos | |
113 { | |
114 /* Character position. */ | |
115 int charpos; | |
116 | |
117 /* Corresponding byte position. */ | |
118 int bytepos; | |
119 }; | |
120 | |
121 /* Access character and byte position of POS in a functional form. */ | |
122 | |
123 #define BYTEPOS(POS) (POS).bytepos | |
124 #define CHARPOS(POS) (POS).charpos | |
125 | |
126 /* Set character position of POS to CHARPOS, byte position to BYTEPOS. */ | |
127 | |
128 #define SET_TEXT_POS(POS, CHARPOS, BYTEPOS) \ | |
129 ((POS).charpos = (CHARPOS), (POS).bytepos = BYTEPOS) | |
130 | |
131 /* Increment text position POS. */ | |
132 | |
28360
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
133 #define INC_TEXT_POS(POS, MULTIBYTE_P) \ |
25012 | 134 do \ |
135 { \ | |
136 ++(POS).charpos; \ | |
28360
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
137 if (MULTIBYTE_P) \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
138 INC_POS ((POS).bytepos); \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
139 else \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
140 ++(POS).bytepos; \ |
25012 | 141 } \ |
142 while (0) | |
143 | |
144 /* Decrement text position POS. */ | |
145 | |
28360
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
146 #define DEC_TEXT_POS(POS, MULTIBYTE_P) \ |
25012 | 147 do \ |
148 { \ | |
149 --(POS).charpos; \ | |
28360
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
150 if (MULTIBYTE_P) \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
151 DEC_POS ((POS).bytepos); \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
152 else \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
153 --(POS).bytepos; \ |
25012 | 154 } \ |
155 while (0) | |
156 | |
157 /* Set text position POS from marker MARKER. */ | |
158 | |
159 #define SET_TEXT_POS_FROM_MARKER(POS, MARKER) \ | |
160 (CHARPOS (POS) = marker_position ((MARKER)), \ | |
161 BYTEPOS (POS) = marker_byte_position ((MARKER))) | |
162 | |
163 /* Set marker MARKER from text position POS. */ | |
164 | |
165 #define SET_MARKER_FROM_TEXT_POS(MARKER, POS) \ | |
166 set_marker_both ((MARKER), Qnil, CHARPOS ((POS)), BYTEPOS ((POS))) | |
167 | |
168 /* Value is non-zero if character and byte positions of POS1 and POS2 | |
169 are equal. */ | |
170 | |
171 #define TEXT_POS_EQUAL_P(POS1, POS2) \ | |
172 ((POS1).charpos == (POS2).charpos \ | |
173 && (POS1).bytepos == (POS2).bytepos) | |
174 | |
175 /* When rendering glyphs, redisplay scans string or buffer text, | |
176 overlay strings in that text, and does display table or control | |
177 character translations. The following structure captures a | |
178 position taking all this into account. */ | |
179 | |
180 struct display_pos | |
181 { | |
182 /* Buffer or string position. */ | |
183 struct text_pos pos; | |
184 | |
185 /* If this is a position in an overlay string, overlay_string_index | |
186 is the index of that overlay string in the sequence of overlay | |
187 strings at `pos' in the order redisplay processes them. A value | |
188 < 0 means that this is not a position in an overlay string. */ | |
189 int overlay_string_index; | |
190 | |
191 /* If this is a position in an overlay string, string_pos is the | |
192 position within that string. */ | |
193 struct text_pos string_pos; | |
194 | |
195 /* If the character at the position above is a control character or | |
196 has a display table entry, dpvec_index is an index in the display | |
197 table or control character translation of that character. A | |
198 value < 0 means this is not a position in such a translation. */ | |
199 int dpvec_index; | |
200 }; | |
201 | |
202 | |
203 | |
204 /*********************************************************************** | |
205 Glyphs | |
206 ***********************************************************************/ | |
207 | |
208 /* Enumeration of glyph types. Glyph structures contain a type field | |
209 containing one of the enumerators defined here. */ | |
210 | |
211 enum glyph_type | |
212 { | |
213 /* Glyph describes a character. */ | |
214 CHAR_GLYPH, | |
215 | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
216 /* Glyph describes a composition sequence. */ |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
217 COMPOSITE_GLYPH, |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
218 |
25012 | 219 /* Glyph describes an image. */ |
220 IMAGE_GLYPH, | |
221 | |
222 /* Glyph is a space of fractional width and/or height. */ | |
223 STRETCH_GLYPH | |
224 }; | |
225 | |
226 | |
30040 | 227 /* Glyphs. |
228 | |
229 Be extra careful when changing this structure! Esp. make sure that | |
230 functions producing glyphs, like x_append_glyph, fill ALL of the | |
231 glyph structure, and that GLYPH_EQUAL_P compares all | |
232 display-relevant members of glyphs (not to imply that these are the | |
233 only things to check when you add a member). */ | |
25012 | 234 |
235 struct glyph | |
236 { | |
237 /* Position from which this glyph was drawn. If `object' below is a | |
238 Lisp string, this is a position in that string. If it is a | |
239 buffer, this is a position in that buffer. A value of -1 | |
240 together with a null object means glyph is a truncation glyph at | |
241 the start of a row. */ | |
242 int charpos; | |
243 | |
244 /* Lisp object source of this glyph. Currently either a buffer or | |
36799 | 245 a string, if the glyph was produced from characters which came from |
246 a buffer or a string; or 0 if the glyph was inserted by redisplay | |
247 for its own purposes such as padding. */ | |
25012 | 248 Lisp_Object object; |
249 | |
250 /* Width in pixels. */ | |
251 short pixel_width; | |
252 | |
253 /* Vertical offset. If < 0, the glyph is displayed raised, if > 0 | |
254 the glyph is displayed lowered. */ | |
255 short voffset; | |
256 | |
257 /* Which kind of glyph this is---character, image etc. Value | |
258 should be an enumerator of type enum glyph_type. */ | |
259 unsigned type : 2; | |
260 | |
261 /* 1 means this glyph was produced from multibyte text. Zero | |
262 means it was produced from unibyte text, i.e. charsets aren't | |
263 applicable, and encoding is not performed. */ | |
264 unsigned multibyte_p : 1; | |
265 | |
266 /* Non-zero means draw a box line at the left or right side of this | |
267 glyph. This is part of the implementation of the face attribute | |
268 `:box'. */ | |
269 unsigned left_box_line_p : 1; | |
270 unsigned right_box_line_p : 1; | |
271 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
272 /* Non-zero means this glyph's physical ascent or descent is greater |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
273 than its logical ascent/descent, i.e. it may potentially overlap |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
274 glyphs above or below it. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
275 unsigned overlaps_vertically_p : 1; |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
276 |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
277 /* 1 means glyph is a padding glyph. Padding glyphs are used for |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
278 characters whose visual shape consists of more than one glyph |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
279 (e.g. Asian characters). All but the first glyph of such a glyph |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
280 sequence have the padding_p flag set. Only used for terminal |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
281 frames, and there only to minimize code changes. A better way |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
282 would probably be to use the width field of glyphs to express |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
283 padding. */ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
284 unsigned padding_p : 1; |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
285 |
36799 | 286 /* 1 means the actual glyph is not available, draw a box instead. |
287 This can happen when a font couldn't be loaded, or a character | |
288 doesn't have a glyph in a font. */ | |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
289 unsigned glyph_not_available_p : 1; |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
290 |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
291 /* Face of the glyph. */ |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
292 unsigned face_id : 22; |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
293 |
29311
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
294 #ifdef WINDOWSNT |
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
295 /* Type of font used to display the character glyph. Used to |
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
296 determine which set of functions to use to obtain font metrics |
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
297 for the glyph. Value should be an enumerator of the type |
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
298 w32_char_font_type. */ |
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
299 unsigned w32_font_type : 2; |
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
300 #endif |
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
301 |
25012 | 302 /* A union of sub-structures for different glyph types. */ |
303 union | |
1409
7fd1c810daca
* dispextern.h: New element of frame structure `max_ascent'.
Joseph Arceneaux <jla@gnu.org>
parents:
764
diff
changeset
|
304 { |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
305 /* Character code for character glyphs (type == CHAR_GLYPH). */ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
306 unsigned ch; |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
307 |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
308 /* Composition ID for composition glyphs (type == COMPOSITION_GLYPH) */ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
309 unsigned cmp_id; |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
310 |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
311 /* Image ID for image glyphs (type == IMAGE_GLYPH). */ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
312 unsigned img_id; |
25012 | 313 |
314 /* Sub-structure for type == STRETCH_GLYPH. */ | |
315 struct | |
316 { | |
317 /* The height of the glyph. */ | |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
318 unsigned height : 16; |
25012 | 319 |
320 /* The ascent of the glyph. */ | |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
321 unsigned ascent : 16; |
25012 | 322 } |
323 stretch; | |
324 | |
325 /* Used to compare all bit-fields above in one step. */ | |
326 unsigned val; | |
327 } u; | |
328 }; | |
329 | |
330 | |
331 /* Is GLYPH a space? */ | |
332 | |
333 #define CHAR_GLYPH_SPACE_P(GLYPH) \ | |
334 (GLYPH_FROM_CHAR_GLYPH ((GLYPH)) == SPACEGLYPH) | |
335 | |
30040 | 336 /* Are glyphs *X and *Y displayed equal? */ |
25012 | 337 |
338 #define GLYPH_EQUAL_P(X, Y) \ | |
339 ((X)->type == (Y)->type \ | |
340 && (X)->u.val == (Y)->u.val \ | |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
341 && (X)->face_id == (Y)->face_id \ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
342 && (X)->padding_p == (Y)->padding_p \ |
25012 | 343 && (X)->left_box_line_p == (Y)->left_box_line_p \ |
344 && (X)->right_box_line_p == (Y)->right_box_line_p \ | |
34800
075528550112
(GLYPH_EQUAL_P): Also compare pixel widths,
Gerd Moellmann <gerd@gnu.org>
parents:
34787
diff
changeset
|
345 && (X)->voffset == (Y)->voffset \ |
075528550112
(GLYPH_EQUAL_P): Also compare pixel widths,
Gerd Moellmann <gerd@gnu.org>
parents:
34787
diff
changeset
|
346 && (X)->pixel_width == (Y)->pixel_width) |
25012 | 347 |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
348 /* Are character codes, faces, padding_ps of glyphs *X and *Y equal? */ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
349 |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
350 #define GLYPH_CHAR_AND_FACE_EQUAL_P(X, Y) \ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
351 ((X)->u.ch == (Y)->u.ch \ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
352 && (X)->face_id == (Y)->face_id \ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
353 && (X)->padding_p == (Y)->padding_p) |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
354 |
25012 | 355 /* Fill a character glyph GLYPH. CODE, FACE_ID, PADDING_P correspond |
356 to the bits defined for the typedef `GLYPH' in lisp.h. */ | |
357 | |
358 #define SET_CHAR_GLYPH(GLYPH, CODE, FACE_ID, PADDING_P) \ | |
359 do \ | |
360 { \ | |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
361 (GLYPH).u.ch = (CODE); \ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
362 (GLYPH).face_id = (FACE_ID); \ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
363 (GLYPH).padding_p = (PADDING_P); \ |
25012 | 364 } \ |
365 while (0) | |
366 | |
367 /* Fill a character type glyph GLYPH from a glyph typedef FROM as | |
368 defined in lisp.h. */ | |
369 | |
370 #define SET_CHAR_GLYPH_FROM_GLYPH(GLYPH, FROM) \ | |
371 SET_CHAR_GLYPH ((GLYPH), \ | |
372 FAST_GLYPH_CHAR ((FROM)), \ | |
373 FAST_GLYPH_FACE ((FROM)), \ | |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
374 0) |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
375 |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
376 /* Construct a glyph code from a character glyph GLYPH. If the |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
377 character is multibyte, return -1 as we can't use glyph table for a |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
378 multibyte character. */ |
25012 | 379 |
30475
fe219c6d2ba2
(GLYPH_FROM_CHAR_GLYPH): Use CHARACTERBITS bits
Gerd Moellmann <gerd@gnu.org>
parents:
30343
diff
changeset
|
380 #define GLYPH_FROM_CHAR_GLYPH(GLYPH) \ |
fe219c6d2ba2
(GLYPH_FROM_CHAR_GLYPH): Use CHARACTERBITS bits
Gerd Moellmann <gerd@gnu.org>
parents:
30343
diff
changeset
|
381 ((GLYPH).u.ch < 256 \ |
fe219c6d2ba2
(GLYPH_FROM_CHAR_GLYPH): Use CHARACTERBITS bits
Gerd Moellmann <gerd@gnu.org>
parents:
30343
diff
changeset
|
382 ? ((GLYPH).u.ch | ((GLYPH).face_id << CHARACTERBITS)) \ |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
383 : -1) |
25012 | 384 |
385 /* Is GLYPH a padding glyph? */ | |
386 | |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
387 #define CHAR_GLYPH_PADDING_P(GLYPH) (GLYPH).padding_p |
25012 | 388 |
389 | |
390 | |
391 | |
392 /*********************************************************************** | |
393 Glyph Pools | |
394 ***********************************************************************/ | |
395 | |
396 /* Glyph Pool. | |
397 | |
398 Glyph memory for frame-based redisplay is allocated from the heap | |
399 in one vector kept in a glyph pool structure which is stored with | |
400 the frame. The size of the vector is made large enough to cover | |
401 all windows on the frame. | |
402 | |
403 Both frame and window glyph matrices reference memory from a glyph | |
404 pool in frame-based redisplay. | |
405 | |
406 In window-based redisplay, no glyphs pools exist; windows allocate | |
407 and free their glyph memory themselves. */ | |
408 | |
409 struct glyph_pool | |
410 { | |
411 /* Vector of glyphs allocated from the heap. */ | |
412 struct glyph *glyphs; | |
413 | |
414 /* Allocated size of `glyphs'. */ | |
415 int nglyphs; | |
416 | |
417 /* Number of rows and columns in a matrix. */ | |
418 int nrows, ncolumns; | |
419 }; | |
420 | |
421 | |
422 | |
423 /*********************************************************************** | |
424 Glyph Matrix | |
425 ***********************************************************************/ | |
426 | |
427 /* Glyph Matrix. | |
428 | |
429 Three kinds of glyph matrices exist: | |
430 | |
431 1. Frame glyph matrices. These are used for terminal frames whose | |
432 redisplay needs a view of the whole screen due to limited terminal | |
433 capabilities. Frame matrices are used only in the update phase | |
434 of redisplay. They are built in update_frame and not used after | |
435 the update has been performed. | |
436 | |
437 2. Window glyph matrices on frames having frame glyph matrices. | |
438 Such matrices are sub-matrices of their corresponding frame matrix, | |
439 i.e. frame glyph matrices and window glyph matrices share the same | |
440 glyph memory which is allocated in form of a glyph_pool structure. | |
441 Glyph rows in such a window matrix are slices of frame matrix rows. | |
442 | |
443 2. Free-standing window glyph matrices managing their own glyph | |
444 storage. This form is used in window-based redisplay which | |
445 includes variable width and height fonts etc. | |
446 | |
447 The size of a window's row vector depends on the height of fonts | |
448 defined on its frame. It is chosen so that the vector is large | |
449 enough to describe all lines in a window when it is displayed in | |
450 the smallest possible character size. When new fonts are loaded, | |
451 or window sizes change, the row vector is adjusted accordingly. */ | |
452 | |
453 struct glyph_matrix | |
454 { | |
455 /* The pool from which glyph memory is allocated, if any. This is | |
456 null for frame matrices and for window matrices managing their | |
457 own storage. */ | |
458 struct glyph_pool *pool; | |
459 | |
460 /* Vector of glyph row structures. The row at nrows - 1 is reserved | |
461 for the mode line. */ | |
462 struct glyph_row *rows; | |
463 | |
464 /* Number of elements allocated for the vector rows above. */ | |
465 int rows_allocated; | |
466 | |
467 /* The number of rows used by the window if all lines were displayed | |
468 with the smallest possible character height. */ | |
469 int nrows; | |
470 | |
471 /* Origin within the frame matrix if this is a window matrix on a | |
472 frame having a frame matrix. Both values are zero for | |
473 window-based redisplay. */ | |
474 int matrix_x, matrix_y; | |
475 | |
476 /* Width and height of the matrix in columns and rows. */ | |
477 int matrix_w, matrix_h; | |
478 | |
34280
4a7a6cfe861d
(struct glyph_matrix): Add member window_left_x.
Gerd Moellmann <gerd@gnu.org>
parents:
34226
diff
changeset
|
479 /* If this structure describes a window matrix of window W, |
4a7a6cfe861d
(struct glyph_matrix): Add member window_left_x.
Gerd Moellmann <gerd@gnu.org>
parents:
34226
diff
changeset
|
480 window_left_x is the value of W->left, window_top_y the value of |
4a7a6cfe861d
(struct glyph_matrix): Add member window_left_x.
Gerd Moellmann <gerd@gnu.org>
parents:
34226
diff
changeset
|
481 W->top, window_height and window_width are width and height of W, |
4a7a6cfe861d
(struct glyph_matrix): Add member window_left_x.
Gerd Moellmann <gerd@gnu.org>
parents:
34226
diff
changeset
|
482 as returned by window_box, and window_vscroll is the value of |
4a7a6cfe861d
(struct glyph_matrix): Add member window_left_x.
Gerd Moellmann <gerd@gnu.org>
parents:
34226
diff
changeset
|
483 W->vscroll at the time the matrix was last adjusted. Only set |
4a7a6cfe861d
(struct glyph_matrix): Add member window_left_x.
Gerd Moellmann <gerd@gnu.org>
parents:
34226
diff
changeset
|
484 for window-based redisplay. */ |
4a7a6cfe861d
(struct glyph_matrix): Add member window_left_x.
Gerd Moellmann <gerd@gnu.org>
parents:
34226
diff
changeset
|
485 int window_left_x, window_top_y, window_height, window_width, window_vscroll; |
25012 | 486 |
487 /* Number of glyphs reserved for left and right marginal areas when | |
488 the matrix was last adjusted. */ | |
489 int left_margin_glyphs, right_margin_glyphs; | |
490 | |
491 /* Flag indicating that scrolling should not be tried in | |
492 update_window. This flag is set by functions like try_window_id | |
493 which do their own scrolling. */ | |
494 unsigned no_scrolling_p : 1; | |
495 | |
496 /* Non-zero means window displayed in this matrix has a top mode | |
497 line. */ | |
25546 | 498 unsigned header_line_p : 1; |
25012 | 499 |
500 #ifdef GLYPH_DEBUG | |
501 /* A string identifying the method used to display the matrix. */ | |
502 char method[512]; | |
503 #endif | |
25371
f13b05bf590b
(struct glyph_matrix): Add buffer, begv, and zv.
Gerd Moellmann <gerd@gnu.org>
parents:
25344
diff
changeset
|
504 |
37628 | 505 /* The buffer this matrix displays. Set in |
506 mark_window_display_accurate_1. */ | |
25371
f13b05bf590b
(struct glyph_matrix): Add buffer, begv, and zv.
Gerd Moellmann <gerd@gnu.org>
parents:
25344
diff
changeset
|
507 struct buffer *buffer; |
f13b05bf590b
(struct glyph_matrix): Add buffer, begv, and zv.
Gerd Moellmann <gerd@gnu.org>
parents:
25344
diff
changeset
|
508 |
37628 | 509 /* Values of BEGV and ZV as of last redisplay. Set in |
510 mark_window_display_accurate_1. */ | |
25371
f13b05bf590b
(struct glyph_matrix): Add buffer, begv, and zv.
Gerd Moellmann <gerd@gnu.org>
parents:
25344
diff
changeset
|
511 int begv, zv; |
25012 | 512 }; |
513 | |
514 | |
515 /* Check that glyph pointers stored in glyph rows of MATRIX are okay. | |
516 This aborts if any pointer is found twice. */ | |
517 | |
518 #if GLYPH_DEBUG | |
519 void check_matrix_pointer_lossage P_ ((struct glyph_matrix *)); | |
520 #define CHECK_MATRIX(MATRIX) check_matrix_pointer_lossage ((MATRIX)) | |
521 #else | |
522 #define CHECK_MATRIX(MATRIX) (void) 0 | |
523 #endif | |
524 | |
525 | |
526 | |
527 /*********************************************************************** | |
528 Glyph Rows | |
529 ***********************************************************************/ | |
530 | |
531 /* Area in window glyph matrix. If values are added or removed, the | |
532 function mark_object in alloc.c has to be changed. */ | |
533 | |
534 enum glyph_row_area | |
535 { | |
536 LEFT_MARGIN_AREA, | |
537 TEXT_AREA, | |
538 RIGHT_MARGIN_AREA, | |
539 LAST_AREA | |
540 }; | |
541 | |
542 | |
543 /* Rows of glyphs in a windows or frame glyph matrix. | |
544 | |
545 Each row is partitioned into three areas. The start and end of | |
546 each area is recorded in a pointer as shown below. | |
547 | |
548 +--------------------+-------------+---------------------+ | |
549 | left margin area | text area | right margin area | | |
550 +--------------------+-------------+---------------------+ | |
551 | | | | | |
552 glyphs[LEFT_MARGIN_AREA] glyphs[RIGHT_MARGIN_AREA] | |
553 | | | |
554 glyphs[TEXT_AREA] | | |
555 glyphs[LAST_AREA] | |
556 | |
557 Rows in frame matrices reference glyph memory allocated in a frame | |
558 glyph pool (see the description of struct glyph_pool). Rows in | |
559 window matrices on frames having frame matrices reference slices of | |
560 the glyphs of corresponding rows in the frame matrix. | |
561 | |
562 Rows in window matrices on frames having no frame matrices point to | |
563 glyphs allocated from the heap via xmalloc; | |
564 glyphs[LEFT_MARGIN_AREA] is the start address of the allocated | |
565 glyph structure array. */ | |
566 | |
567 struct glyph_row | |
568 { | |
569 /* Pointers to beginnings of areas. The end of an area A is found at | |
570 A + 1 in the vector. The last element of the vector is the end | |
571 of the whole row. | |
572 | |
573 Kludge alert: Even if used[TEXT_AREA] == 0, glyphs[TEXT_AREA][0]'s | |
574 position field is used. It is -1 if this row does not correspond | |
575 to any text; it is some buffer position if the row corresponds to | |
576 an empty display line that displays a line end. This is what old | |
577 redisplay used to do. (Except in code for terminal frames, this | |
578 kludge is no longer use, I believe. --gerd). | |
579 | |
580 See also start, end, displays_text_p and ends_at_zv_p for cleaner | |
581 ways to do it. The special meaning of positions 0 and -1 will be | |
582 removed some day, so don't use it in new code. */ | |
583 struct glyph *glyphs[1 + LAST_AREA]; | |
584 | |
585 /* Number of glyphs actually filled in areas. */ | |
586 short used[LAST_AREA]; | |
587 | |
588 /* Window-relative x and y-position of the top-left corner of this | |
589 row. If y < 0, this means that abs (y) pixels of the row are | |
590 invisible because it is partially visible at the top of a window. | |
591 If x < 0, this means that abs (x) pixels of the first glyph of | |
592 the text area of the row are invisible because the glyph is | |
593 partially visible. */ | |
594 int x, y; | |
595 | |
596 /* Width of the row in pixels without taking face extension at the | |
38266 | 597 end of the row into account, and without counting truncation |
598 and continuation glyphs at the end of a row on ttys. */ | |
25012 | 599 int pixel_width; |
600 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
601 /* Logical ascent/height of this line. The value of ascent is zero |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
602 and height is 1 on terminal frames. */ |
25012 | 603 int ascent, height; |
604 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
605 /* Physical ascent/height of this line. If max_ascent > ascent, |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
606 this line overlaps the line above it on the display. Otherwise, |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
607 if max_height > height, this line overlaps the line beneath it. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
608 int phys_ascent, phys_height; |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
609 |
25012 | 610 /* Portion of row that is visible. Partially visible rows may be |
611 found at the top and bottom of a window. This is 1 for tty | |
612 frames. It may be < 0 in case of completely invisible rows. */ | |
613 int visible_height; | |
614 | |
615 /* Hash code. This hash code is available as soon as the row | |
616 is constructed, i.e. after a call to display_line. */ | |
617 unsigned hash; | |
618 | |
619 /* First position in this row. This is the text position, including | |
620 overlay position information etc, where the display of this row | |
621 started, and can thus be less the position of the first glyph | |
622 (e.g. due to invisible text or horizontal scrolling). */ | |
623 struct display_pos start; | |
624 | |
625 /* Text position at the end of this row. This is the position after | |
626 the last glyph on this row. It can be greater than the last | |
627 glyph position + 1, due to truncation, invisible text etc. In an | |
628 up-to-date display, this should always be equal to the start | |
629 position of the next row. */ | |
630 struct display_pos end; | |
631 | |
632 /* In a desired matrix, 1 means that this row must be updated. In a | |
633 current matrix, 0 means that the row has been invalidated, i.e. | |
634 the row's contents do not agree with what is visible on the | |
635 screen. */ | |
636 unsigned enabled_p : 1; | |
637 | |
638 /* Display this line in inverse video? Used for the mode line and | |
639 menu bar lines. */ | |
640 unsigned inverse_p : 1; | |
641 | |
642 /* 1 means row displays a text line that is truncated on the left or | |
643 right side. */ | |
644 unsigned truncated_on_left_p : 1; | |
645 unsigned truncated_on_right_p : 1; | |
646 | |
647 /* 1 means the overlay arrow is on this line. */ | |
648 unsigned overlay_arrow_p : 1; | |
1409
7fd1c810daca
* dispextern.h: New element of frame structure `max_ascent'.
Joseph Arceneaux <jla@gnu.org>
parents:
764
diff
changeset
|
649 |
25012 | 650 /* 1 means that this row displays a continued line, i.e. it has a |
651 continuation mark at the right side. */ | |
652 unsigned continued_p : 1; | |
653 | |
654 /* 0 means that this row does not contain any text, i.e. it is | |
655 a blank line at the window and buffer end. */ | |
656 unsigned displays_text_p : 1; | |
657 | |
658 /* 1 means that this line ends at ZV. */ | |
659 unsigned ends_at_zv_p : 1; | |
660 | |
661 /* 1 means the face of the last glyph in the text area is drawn to | |
662 the right end of the window. This flag is used in | |
663 update_text_area to optimize clearing to the end of the area. */ | |
664 unsigned fill_line_p : 1; | |
665 | |
666 /* Non-zero means display a bitmap on X frames indicating that this | |
667 line contains no text and ends in ZV. */ | |
668 unsigned indicate_empty_line_p : 1; | |
669 | |
670 /* 1 means this row contains glyphs that overlap each other because | |
671 of lbearing or rbearing. */ | |
672 unsigned contains_overlapping_glyphs_p : 1; | |
673 | |
674 /* 1 means this row is a wide as the window it is displayed in, including | |
675 scroll bars, bitmap areas, and internal borders. This also | |
676 implies that the row doesn't have marginal areas. */ | |
677 unsigned full_width_p : 1; | |
678 | |
679 /* Non-zero means row is a mode or top-line. */ | |
680 unsigned mode_line_p : 1; | |
681 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
682 /* 1 in a current row means this row is overlapped by another row. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
683 unsigned overlapped_p : 1; |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
684 |
29474
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
685 /* 1 means this line ends in the middle of a character consisting |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
686 of more than one glyph. Some glyphs have been put in this row, |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
687 the rest are put in rows below this one. */ |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
688 unsigned ends_in_middle_of_char_p : 1; |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
689 |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
690 /* 1 means this line starts in the middle of a character consisting |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
691 of more than one glyph. Some glyphs have been put in the |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
692 previoius row, the rest are put in this row. */ |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
693 unsigned starts_in_middle_of_char_p : 1; |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
694 |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
695 /* 1 in a current row means this row overlaps others. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
696 unsigned overlapping_p : 1; |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
697 |
30151
de813a66787a
(struct glyph_row): Add flag mouse_face_p.
Gerd Moellmann <gerd@gnu.org>
parents:
30040
diff
changeset
|
698 /* 1 means some glyphs in this row are displayed in mouse-face. */ |
de813a66787a
(struct glyph_row): Add flag mouse_face_p.
Gerd Moellmann <gerd@gnu.org>
parents:
30040
diff
changeset
|
699 unsigned mouse_face_p : 1; |
de813a66787a
(struct glyph_row): Add flag mouse_face_p.
Gerd Moellmann <gerd@gnu.org>
parents:
30040
diff
changeset
|
700 |
25012 | 701 /* Continuation lines width at the start of the row. */ |
702 int continuation_lines_width; | |
703 }; | |
704 | |
705 | |
706 /* Get a pointer to row number ROW in matrix MATRIX. If GLYPH_DEBUG | |
707 is defined to a non-zero value, the function matrix_row checks that | |
708 we don't try to access rows that are out of bounds. */ | |
709 | |
710 #if GLYPH_DEBUG | |
711 struct glyph_row *matrix_row P_ ((struct glyph_matrix *, int)); | |
712 #define MATRIX_ROW(MATRIX, ROW) matrix_row ((MATRIX), (ROW)) | |
713 #else | |
714 #define MATRIX_ROW(MATRIX, ROW) ((MATRIX)->rows + (ROW)) | |
715 #endif | |
716 | |
717 /* Return a pointer to the row reserved for the mode line in MATRIX. | |
718 Row MATRIX->nrows - 1 is always reserved for the mode line. */ | |
719 | |
720 #define MATRIX_MODE_LINE_ROW(MATRIX) \ | |
721 ((MATRIX)->rows + (MATRIX)->nrows - 1) | |
722 | |
723 /* Return a pointer to the row reserved for the top line in MATRIX. | |
724 This is always the first row in MATRIX because that's the only | |
725 way that works in frame-based redisplay. */ | |
726 | |
25546 | 727 #define MATRIX_HEADER_LINE_ROW(MATRIX) (MATRIX)->rows |
25012 | 728 |
729 /* Return a pointer to first row in MATRIX used for text display. */ | |
730 | |
731 #define MATRIX_FIRST_TEXT_ROW(MATRIX) \ | |
732 ((MATRIX)->rows->mode_line_p ? (MATRIX)->rows + 1 : (MATRIX)->rows) | |
733 | |
734 /* Return a pointer to the first glyph in the text area of a row. | |
735 MATRIX is the glyph matrix accessed, and ROW is the row index in | |
736 MATRIX. */ | |
737 | |
738 #define MATRIX_ROW_GLYPH_START(MATRIX, ROW) \ | |
739 (MATRIX_ROW ((MATRIX), (ROW))->glyphs[TEXT_AREA]) | |
740 | |
741 /* Return the number of used glyphs in the text area of a row. */ | |
742 | |
743 #define MATRIX_ROW_USED(MATRIX, ROW) \ | |
744 (MATRIX_ROW ((MATRIX), (ROW))->used[TEXT_AREA]) | |
745 | |
746 /* Return the character/ byte position at which the display of ROW | |
747 starts. */ | |
748 | |
749 #define MATRIX_ROW_START_CHARPOS(ROW) ((ROW)->start.pos.charpos) | |
750 #define MATRIX_ROW_START_BYTEPOS(ROW) ((ROW)->start.pos.bytepos) | |
751 | |
752 /* Return character/ byte position at which ROW ends. */ | |
753 | |
754 #define MATRIX_ROW_END_CHARPOS(ROW) ((ROW)->end.pos.charpos) | |
755 #define MATRIX_ROW_END_BYTEPOS(ROW) ((ROW)->end.pos.bytepos) | |
756 | |
757 /* Return the vertical position of ROW in MATRIX. */ | |
758 | |
759 #define MATRIX_ROW_VPOS(ROW, MATRIX) ((ROW) - (MATRIX)->rows) | |
760 | |
761 /* Return the last glyph row + 1 in MATRIX on window W reserved for | |
762 text. If W has a mode line, the last row in the matrix is reserved | |
763 for it. */ | |
764 | |
765 #define MATRIX_BOTTOM_TEXT_ROW(MATRIX, W) \ | |
766 ((MATRIX)->rows \ | |
767 + (MATRIX)->nrows \ | |
768 - (WINDOW_WANTS_MODELINE_P ((W)) ? 1 : 0)) | |
769 | |
770 /* Non-zero if the face of the last glyph in ROW's text area has | |
771 to be drawn to the end of the text area. */ | |
772 | |
773 #define MATRIX_ROW_EXTENDS_FACE_P(ROW) ((ROW)->fill_line_p) | |
774 | |
775 /* Set and query the enabled_p flag of glyph row ROW in MATRIX. */ | |
776 | |
777 #define SET_MATRIX_ROW_ENABLED_P(MATRIX, ROW, VALUE) \ | |
778 (MATRIX_ROW ((MATRIX), (ROW))->enabled_p = (VALUE) != 0) | |
779 | |
780 #define MATRIX_ROW_ENABLED_P(MATRIX, ROW) \ | |
781 (MATRIX_ROW ((MATRIX), (ROW))->enabled_p) | |
782 | |
783 /* Non-zero if ROW displays text. Value is non-zero if the row is | |
784 blank but displays a line end. */ | |
785 | |
786 #define MATRIX_ROW_DISPLAYS_TEXT_P(ROW) ((ROW)->displays_text_p) | |
787 | |
788 /* Non-zero if ROW is not completely visible in window W. */ | |
789 | |
790 #define MATRIX_ROW_PARTIALLY_VISIBLE_P(ROW) \ | |
791 ((ROW)->height != (ROW)->visible_height) | |
792 | |
793 /* Non-zero if ROW is partially visible at the top of window W. */ | |
794 | |
795 #define MATRIX_ROW_PARTIALLY_VISIBLE_AT_TOP_P(W, ROW) \ | |
796 (MATRIX_ROW_PARTIALLY_VISIBLE_P ((ROW)) \ | |
25546 | 797 && (ROW)->y < WINDOW_DISPLAY_HEADER_LINE_HEIGHT ((W))) |
25012 | 798 |
799 /* Non-zero if ROW is partially visible at the bottom of window W. */ | |
800 | |
801 #define MATRIX_ROW_PARTIALLY_VISIBLE_AT_BOTTOM_P(W, ROW) \ | |
802 (MATRIX_ROW_PARTIALLY_VISIBLE_P ((ROW)) \ | |
803 && (ROW)->y + (ROW)->height > WINDOW_DISPLAY_HEIGHT_NO_MODE_LINE ((W))) | |
804 | |
805 /* Return the bottom Y + 1 of ROW. */ | |
806 | |
807 #define MATRIX_ROW_BOTTOM_Y(ROW) ((ROW)->y + (ROW)->height) | |
808 | |
809 /* Is ROW the last visible one in the display described by the | |
810 iterator structure pointed to by IT?. */ | |
811 | |
812 #define MATRIX_ROW_LAST_VISIBLE_P(ROW, IT) \ | |
813 (MATRIX_ROW_BOTTOM_Y ((ROW)) >= (IT)->last_visible_y) | |
814 | |
815 /* Non-zero if ROW displays a continuation line. */ | |
816 | |
817 #define MATRIX_ROW_CONTINUATION_LINE_P(ROW) \ | |
818 ((ROW)->continuation_lines_width > 0) | |
819 | |
820 /* Non-zero if ROW ends in the middle of a character. This is the | |
821 case for continued lines showing only part of a display table entry | |
822 or a control char, or an overlay string. */ | |
823 | |
824 #define MATRIX_ROW_ENDS_IN_MIDDLE_OF_CHAR_P(ROW) \ | |
825 ((ROW)->end.dpvec_index >= 0 \ | |
29474
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
826 || (ROW)->end.overlay_string_index >= 0 \ |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
827 || (ROW)->ends_in_middle_of_char_p) |
25012 | 828 |
829 /* Non-zero if ROW ends in the middle of an overlay string. */ | |
830 | |
831 #define MATRIX_ROW_ENDS_IN_OVERLAY_STRING_P(ROW) \ | |
832 ((ROW)->end.overlay_string_index >= 0) | |
833 | |
834 /* Non-zero if ROW starts in the middle of a character. See above. */ | |
835 | |
836 #define MATRIX_ROW_STARTS_IN_MIDDLE_OF_CHAR_P(ROW) \ | |
837 ((ROW)->start.dpvec_index >= 0 \ | |
29474
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
838 || (ROW)->starts_in_middle_of_char_p \ |
25012 | 839 || ((ROW)->start.overlay_string_index >= 0 \ |
840 && (ROW)->start.string_pos.charpos > 0)) | |
841 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
842 /* Non-zero means ROW overlaps its predecessor. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
843 |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
844 #define MATRIX_ROW_OVERLAPS_PRED_P(ROW) \ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
845 ((ROW)->phys_ascent > (ROW)->ascent) |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
846 |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
847 /* Non-zero means ROW overlaps its successor. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
848 |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
849 #define MATRIX_ROW_OVERLAPS_SUCC_P(ROW) \ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
850 ((ROW)->phys_height - (ROW)->phys_ascent \ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
851 > (ROW)->height - (ROW)->ascent) |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
852 |
25012 | 853 /* Non-zero means that fonts have been loaded since the last glyph |
854 matrix adjustments. The function redisplay_internal adjusts glyph | |
855 matrices when this flag is non-zero. */ | |
856 | |
857 extern int fonts_changed_p; | |
858 | |
859 /* A glyph for a space. */ | |
860 | |
861 extern struct glyph space_glyph; | |
862 | |
32000
41462e513231
(updating_frame): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31875
diff
changeset
|
863 /* Frame being updated by update_window/update_frame. */ |
41462e513231
(updating_frame): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31875
diff
changeset
|
864 |
41462e513231
(updating_frame): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31875
diff
changeset
|
865 extern struct frame *updating_frame; |
41462e513231
(updating_frame): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31875
diff
changeset
|
866 |
25012 | 867 /* Window being updated by update_window. This is non-null as long as |
868 update_window has not finished, and null otherwise. It's role is | |
869 analogous to updating_frame. */ | |
870 | |
871 extern struct window *updated_window; | |
872 | |
873 /* Glyph row and area updated by update_window_line. */ | |
874 | |
875 extern struct glyph_row *updated_row; | |
876 extern int updated_area; | |
877 | |
878 /* Non-zero means reading single-character input with prompt so put | |
879 cursor on mini-buffer after the prompt. Positive means at end of | |
880 text in echo area; negative means at beginning of line. */ | |
881 | |
882 extern int cursor_in_echo_area; | |
883 | |
884 /* Non-zero means last display completed. Zero means it was | |
885 preempted. */ | |
886 | |
887 extern int display_completed; | |
888 | |
889 /* Non-zero means redisplay has been performed directly (see also | |
890 direct_output_for_insert and direct_output_forward_char), so that | |
891 no further updating has to be performed. The function | |
892 redisplay_internal checks this flag, and does nothing but reset it | |
893 to zero if it is non-zero. */ | |
894 | |
895 extern int redisplay_performed_directly_p; | |
896 | |
897 /* A temporary storage area, including a row of glyphs. Initialized | |
898 in xdisp.c. Used for various purposes, as an example see | |
899 direct_output_for_insert. */ | |
900 | |
901 extern struct glyph_row scratch_glyph_row; | |
902 | |
903 | |
904 | |
905 /************************************************************************ | |
906 Display Dimensions | |
907 ************************************************************************/ | |
908 | |
909 /* Return the height of the mode line in glyph matrix MATRIX, or zero | |
910 if not known. This macro is called under circumstances where | |
911 MATRIX might not have been allocated yet. */ | |
912 | |
913 #define MATRIX_MODE_LINE_HEIGHT(MATRIX) \ | |
914 ((MATRIX) && (MATRIX)->rows \ | |
915 ? MATRIX_MODE_LINE_ROW (MATRIX)->height \ | |
916 : 0) | |
917 | |
918 /* Return the height of the top line in glyph matrix MATRIX, or zero | |
919 if not known. This macro is called under circumstances where | |
920 MATRIX might not have been allocated yet. */ | |
921 | |
25546 | 922 #define MATRIX_HEADER_LINE_HEIGHT(MATRIX) \ |
25012 | 923 ((MATRIX) && (MATRIX)->rows \ |
25546 | 924 ? MATRIX_HEADER_LINE_ROW (MATRIX)->height \ |
25012 | 925 : 0) |
926 | |
927 /* Return the current height of the mode line of window W. If not | |
33460 | 928 known from current_mode_line_height, look at W's current glyph |
929 matrix, or return a default based on the height of the font of the | |
930 face `mode-line'. */ | |
931 | |
932 #define CURRENT_MODE_LINE_HEIGHT(W) \ | |
933 (current_mode_line_height >= 0 \ | |
934 ? current_mode_line_height \ | |
935 : (MATRIX_MODE_LINE_HEIGHT ((W)->current_matrix) \ | |
936 ? MATRIX_MODE_LINE_HEIGHT ((W)->current_matrix) \ | |
937 : estimate_mode_line_height (XFRAME ((W)->frame), \ | |
938 MODE_LINE_FACE_ID))) | |
25012 | 939 |
940 /* Return the current height of the top line of window W. If not | |
33460 | 941 known from current_header_line_height, look at W's current glyph |
942 matrix, or return an estimation based on the height of the font of | |
943 the face `header-line'. */ | |
944 | |
945 #define CURRENT_HEADER_LINE_HEIGHT(W) \ | |
946 (current_header_line_height >= 0 \ | |
947 ? current_header_line_height \ | |
948 : (MATRIX_HEADER_LINE_HEIGHT ((W)->current_matrix) \ | |
949 ? MATRIX_HEADER_LINE_HEIGHT ((W)->current_matrix) \ | |
950 : estimate_mode_line_height (XFRAME ((W)->frame), \ | |
951 HEADER_LINE_FACE_ID))) | |
25012 | 952 |
953 /* Return the height of the desired mode line of window W. */ | |
954 | |
955 #define DESIRED_MODE_LINE_HEIGHT(W) \ | |
956 MATRIX_MODE_LINE_HEIGHT ((W)->desired_matrix) | |
957 | |
958 /* Return the height of the desired top line of window W. */ | |
959 | |
25546 | 960 #define DESIRED_HEADER_LINE_HEIGHT(W) \ |
961 MATRIX_HEADER_LINE_HEIGHT ((W)->desired_matrix) | |
25012 | 962 |
963 /* Like FRAME_INTERNAL_BORDER_WIDTH but checks whether frame F is a | |
964 window-system frame. */ | |
965 | |
966 #define FRAME_INTERNAL_BORDER_WIDTH_SAFE(F) \ | |
967 (FRAME_WINDOW_P (F) ? FRAME_INTERNAL_BORDER_WIDTH (F) : 0) | |
968 | |
969 /* Width of display region of window W. For terminal frames, this | |
970 equals the width of W since there are no vertical scroll bars. For | |
971 window system frames, the value has to be corrected by the pixel | |
972 width of vertical scroll bars, and bitmap areas. */ | |
973 | |
974 #define WINDOW_DISPLAY_PIXEL_WIDTH(W) \ | |
975 (((XFASTINT ((W)->width) \ | |
976 - FRAME_SCROLL_BAR_WIDTH (XFRAME (WINDOW_FRAME ((W)))) \ | |
25458
803de6670aa5
(WINDOW_DISPLAY_PIXEL_WIDTH): Subtract
Gerd Moellmann <gerd@gnu.org>
parents:
25371
diff
changeset
|
977 - FRAME_FLAGS_AREA_COLS (XFRAME (WINDOW_FRAME ((W))))) \ |
25012 | 978 * CANON_X_UNIT (XFRAME (WINDOW_FRAME ((W)))))) |
979 | |
980 /* Height of the display region of W, including a mode line, if any. */ | |
981 | |
982 #define WINDOW_DISPLAY_PIXEL_HEIGHT(W) \ | |
983 (XFASTINT ((W)->height) \ | |
984 * CANON_Y_UNIT (XFRAME (WINDOW_FRAME ((W))))) | |
985 | |
986 /* Height in pixels of the mode line. May be zero if W doesn't have a | |
987 mode line. */ | |
988 | |
989 #define WINDOW_DISPLAY_MODE_LINE_HEIGHT(W) \ | |
990 (WINDOW_WANTS_MODELINE_P ((W)) \ | |
991 ? CURRENT_MODE_LINE_HEIGHT (W) \ | |
992 : 0) | |
993 | |
994 /* Height in pixels of the top line. Zero if W doesn't have a top | |
995 line. */ | |
996 | |
25546 | 997 #define WINDOW_DISPLAY_HEADER_LINE_HEIGHT(W) \ |
998 (WINDOW_WANTS_HEADER_LINE_P ((W)) \ | |
999 ? CURRENT_HEADER_LINE_HEIGHT (W) \ | |
25012 | 1000 : 0) |
1001 | |
1002 /* Pixel height of window W without mode line. */ | |
1003 | |
1004 #define WINDOW_DISPLAY_HEIGHT_NO_MODE_LINE(W) \ | |
1005 (WINDOW_DISPLAY_PIXEL_HEIGHT ((W)) \ | |
1006 - WINDOW_DISPLAY_MODE_LINE_HEIGHT ((W))) | |
1007 | |
1008 /* Pixel height of window W without mode and top line. */ | |
1009 | |
1010 #define WINDOW_DISPLAY_TEXT_HEIGHT(W) \ | |
1011 (WINDOW_DISPLAY_PIXEL_HEIGHT ((W)) \ | |
1012 - WINDOW_DISPLAY_MODE_LINE_HEIGHT ((W)) \ | |
25546 | 1013 - WINDOW_DISPLAY_HEADER_LINE_HEIGHT ((W))) |
25012 | 1014 |
1015 /* Left edge of W in pixels relative to its frame. */ | |
1016 | |
1017 #define WINDOW_DISPLAY_LEFT_EDGE_PIXEL_X(W) \ | |
1018 (FRAME_INTERNAL_BORDER_WIDTH_SAFE (XFRAME (WINDOW_FRAME ((W)))) \ | |
1019 + (WINDOW_LEFT_MARGIN ((W)) \ | |
1020 * CANON_X_UNIT (XFRAME (WINDOW_FRAME ((W))))) \ | |
25458
803de6670aa5
(WINDOW_DISPLAY_PIXEL_WIDTH): Subtract
Gerd Moellmann <gerd@gnu.org>
parents:
25371
diff
changeset
|
1021 + FRAME_LEFT_FLAGS_AREA_WIDTH (XFRAME (WINDOW_FRAME ((W))))) |
25012 | 1022 |
1023 /* Right edge of window W in pixels, relative to its frame. */ | |
1024 | |
1025 #define WINDOW_DISPLAY_RIGHT_EDGE_PIXEL_X(W) \ | |
1026 (WINDOW_DISPLAY_LEFT_EDGE_PIXEL_X ((W)) \ | |
1027 + WINDOW_DISPLAY_PIXEL_WIDTH ((W))) | |
1028 | |
1029 /* Top edge of W in pixels relative to its frame. */ | |
1030 | |
1031 #define WINDOW_DISPLAY_TOP_EDGE_PIXEL_Y(W) \ | |
1032 (FRAME_INTERNAL_BORDER_WIDTH_SAFE (XFRAME (WINDOW_FRAME ((W)))) \ | |
1033 + (XFASTINT ((W)->top) \ | |
1034 * CANON_Y_UNIT (XFRAME (WINDOW_FRAME ((W)))))) | |
1035 | |
1036 /* Bottom edge of window W relative to its frame. */ | |
1037 | |
1038 #define WINDOW_DISPLAY_BOTTOM_EDGE_PIXEL_Y(W) \ | |
1039 (WINDOW_DISPLAY_TOP_EDGE_PIXEL_Y ((W)) \ | |
1040 + WINDOW_DISPLAY_PIXEL_HEIGHT ((W))) | |
1041 | |
1042 /* Convert window W relative pixel X to frame pixel coordinates. */ | |
1043 | |
1044 #define WINDOW_TO_FRAME_PIXEL_X(W, X) \ | |
1045 ((X) + WINDOW_DISPLAY_LEFT_EDGE_PIXEL_X ((W))) | |
1046 | |
1047 /* Convert window W relative pixel Y to frame pixel coordinates. */ | |
1048 | |
1049 #define WINDOW_TO_FRAME_PIXEL_Y(W, Y) \ | |
1050 ((Y) + WINDOW_DISPLAY_TOP_EDGE_PIXEL_Y ((W))) | |
1051 | |
1052 /* Convert frame relative pixel X to window relative pixel X. */ | |
1053 | |
1054 #define FRAME_TO_WINDOW_PIXEL_X(W, X) \ | |
1055 ((X) - WINDOW_DISPLAY_LEFT_EDGE_PIXEL_X ((W))) | |
1056 | |
1057 /* Convert frame relative pixel X to window relative pixel Y. */ | |
1058 | |
1059 #define FRAME_TO_WINDOW_PIXEL_Y(W, Y) \ | |
1060 ((Y) - WINDOW_DISPLAY_TOP_EDGE_PIXEL_Y ((W))) | |
1061 | |
1062 /* Width of left margin area in pixels. */ | |
1063 | |
1064 #define WINDOW_DISPLAY_LEFT_AREA_PIXEL_WIDTH(W) \ | |
1065 (NILP ((W)->left_margin_width) \ | |
1066 ? 0 \ | |
1067 : (XINT ((W)->left_margin_width) \ | |
1068 * CANON_X_UNIT (XFRAME (WINDOW_FRAME ((W)))))) | |
1069 | |
1070 /* Width of right marginal area in pixels. */ | |
1071 | |
1072 #define WINDOW_DISPLAY_RIGHT_AREA_PIXEL_WIDTH(W) \ | |
1073 (NILP ((W)->right_margin_width) \ | |
1074 ? 0 \ | |
1075 : (XINT ((W)->right_margin_width) \ | |
1076 * CANON_X_UNIT (XFRAME (WINDOW_FRAME ((W)))))) | |
1077 | |
1078 /* Width of text area in pixels. */ | |
1079 | |
1080 #define WINDOW_DISPLAY_TEXT_AREA_PIXEL_WIDTH(W) \ | |
1081 (WINDOW_DISPLAY_PIXEL_WIDTH ((W)) \ | |
1082 - WINDOW_DISPLAY_LEFT_AREA_PIXEL_WIDTH ((W)) \ | |
1083 - WINDOW_DISPLAY_RIGHT_AREA_PIXEL_WIDTH ((W))) | |
1084 | |
1085 /* Convert a text area relative x-position in window W to frame X | |
1086 pixel coordinates. */ | |
1087 | |
1088 #define WINDOW_TEXT_TO_FRAME_PIXEL_X(W, X) \ | |
1089 (WINDOW_TO_FRAME_PIXEL_X ((W), (X)) \ | |
1090 + WINDOW_DISPLAY_LEFT_AREA_PIXEL_WIDTH ((W))) | |
1091 | |
1092 /* Translate an x-position relative to AREA in window W to frame pixel | |
1093 coordinates. */ | |
1094 | |
1095 #define WINDOW_AREA_TO_FRAME_PIXEL_X(W, AREA, X) \ | |
1096 (WINDOW_TO_FRAME_PIXEL_X ((W), (X)) \ | |
1097 + (((AREA) > LEFT_MARGIN_AREA) \ | |
1098 ? WINDOW_DISPLAY_LEFT_AREA_PIXEL_WIDTH ((W)) \ | |
1099 : 0) \ | |
1100 + (((AREA) > TEXT_AREA) \ | |
1101 ? WINDOW_DISPLAY_TEXT_AREA_PIXEL_WIDTH ((W)) \ | |
1102 : 0)) | |
1103 | |
1104 /* Return the pixel width of AREA in W. */ | |
1105 | |
1106 #define WINDOW_AREA_PIXEL_WIDTH(W, AREA) \ | |
1107 (((AREA) == TEXT_AREA) \ | |
1108 ? WINDOW_DISPLAY_TEXT_AREA_PIXEL_WIDTH ((W)) \ | |
1109 : (((AREA) == LEFT_MARGIN_AREA) \ | |
1110 ? WINDOW_DISPLAY_LEFT_AREA_PIXEL_WIDTH ((W)) \ | |
1111 : WINDOW_DISPLAY_RIGHT_AREA_PIXEL_WIDTH ((W)))) | |
1112 | |
1113 /* Value is non-zero if window W has a mode line. */ | |
1114 | |
1115 #define WINDOW_WANTS_MODELINE_P(W) \ | |
1116 (!MINI_WINDOW_P (W) \ | |
1117 && !(W)->pseudo_window_p \ | |
1118 && FRAME_WANTS_MODELINE_P (XFRAME (WINDOW_FRAME (W))) \ | |
28417
4b675266db04
* lisp.h (XCONS, XSTRING, XSYMBOL, XFLOAT, XPROCESS, XWINDOW, XSUBR, XBUFFER):
Ken Raeburn <raeburn@raeburn.org>
parents:
28360
diff
changeset
|
1119 && BUFFERP ((W)->buffer) \ |
25012 | 1120 && !NILP (XBUFFER ((W)->buffer)->mode_line_format)) |
1121 | |
1122 /* Value is non-zero if window W wants a top line. */ | |
1123 | |
25546 | 1124 #define WINDOW_WANTS_HEADER_LINE_P(W) \ |
25012 | 1125 (!MINI_WINDOW_P (W) \ |
1126 && !(W)->pseudo_window_p \ | |
1127 && FRAME_WANTS_MODELINE_P (XFRAME (WINDOW_FRAME (W))) \ | |
28417
4b675266db04
* lisp.h (XCONS, XSTRING, XSYMBOL, XFLOAT, XPROCESS, XWINDOW, XSUBR, XBUFFER):
Ken Raeburn <raeburn@raeburn.org>
parents:
28360
diff
changeset
|
1128 && BUFFERP ((W)->buffer) \ |
25546 | 1129 && !NILP (XBUFFER ((W)->buffer)->header_line_format)) |
25012 | 1130 |
1131 | |
1132 /*********************************************************************** | |
1133 Faces | |
1134 ***********************************************************************/ | |
1135 | |
1136 /* Indices of face attributes in Lisp face vectors. Slot zero is the | |
1137 symbol `face'. */ | |
1138 | |
1139 enum lface_attribute_index | |
1140 { | |
1141 LFACE_FAMILY_INDEX = 1, | |
1142 LFACE_SWIDTH_INDEX, | |
1143 LFACE_HEIGHT_INDEX, | |
1144 LFACE_WEIGHT_INDEX, | |
1145 LFACE_SLANT_INDEX, | |
1146 LFACE_UNDERLINE_INDEX, | |
1147 LFACE_INVERSE_INDEX, | |
1148 LFACE_FOREGROUND_INDEX, | |
1149 LFACE_BACKGROUND_INDEX, | |
1150 LFACE_STIPPLE_INDEX, | |
1151 LFACE_OVERLINE_INDEX, | |
1152 LFACE_STRIKE_THROUGH_INDEX, | |
1153 LFACE_BOX_INDEX, | |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1154 LFACE_FONT_INDEX, |
31177
24a1d86d0ee8
(enum lface_attribute_index): Add LFACE_INHERIT_INDEX.
Miles Bader <miles@gnu.org>
parents:
30722
diff
changeset
|
1155 LFACE_INHERIT_INDEX, |
35912
91b7d295be68
(enum lface_attribute_index): Add
Gerd Moellmann <gerd@gnu.org>
parents:
35732
diff
changeset
|
1156 LFACE_AVGWIDTH_INDEX, |
25012 | 1157 LFACE_VECTOR_SIZE |
1158 }; | |
1159 | |
1160 | |
1161 /* Box types of faces. */ | |
1162 | |
1163 enum face_box_type | |
1164 { | |
1165 /* No box around text. */ | |
1166 FACE_NO_BOX, | |
1167 | |
1168 /* Simple box of specified width and color. Default width is 1, and | |
1169 default color is the foreground color of the face. */ | |
1170 FACE_SIMPLE_BOX, | |
1171 | |
1172 /* Boxes with 3D shadows. Color equals the background color of the | |
1173 face. Width is specified. */ | |
1174 FACE_RAISED_BOX, | |
1175 FACE_SUNKEN_BOX | |
1176 }; | |
1177 | |
1178 | |
1179 /* Structure describing a realized face. | |
1180 | |
1181 For each Lisp face, 0..N realized faces can exist for different | |
1182 frames and different charsets. Realized faces are built from Lisp | |
1183 faces and text properties/overlays by merging faces and adding | |
1184 unspecified attributes from the `default' face. */ | |
1185 | |
1186 struct face | |
1187 { | |
1188 /* The id of this face. The id equals the index of this face in the | |
1189 vector faces_by_id of its face cache. */ | |
1190 int id; | |
247 | 1191 |
13407
5ebb99bc06bb
[HAVE_NTGUI]: Include win32.h.
Geoff Voelker <voelker@cs.washington.edu>
parents:
9572
diff
changeset
|
1192 #ifdef HAVE_WINDOW_SYSTEM |
25012 | 1193 |
1194 /* If non-zero, a GC we can use without modification to draw | |
1195 characters in this face. */ | |
1196 GC gc; | |
1197 | |
1198 /* Font used for this face, or null if the font could not be loaded | |
1199 for some reason. This points to a `font' slot of a struct | |
1200 font_info, and we should not call XFreeFont on it because the | |
1201 font may still be used somewhere else. */ | |
1202 XFontStruct *font; | |
1203 | |
38499
a4baa9de015f
(struct face): Change type of `stipple' to
Gerd Moellmann <gerd@gnu.org>
parents:
38266
diff
changeset
|
1204 /* Background stipple or bitmap used for this face. This is |
a4baa9de015f
(struct face): Change type of `stipple' to
Gerd Moellmann <gerd@gnu.org>
parents:
38266
diff
changeset
|
1205 an id as returned from load_pixmap. */ |
a4baa9de015f
(struct face): Change type of `stipple' to
Gerd Moellmann <gerd@gnu.org>
parents:
38266
diff
changeset
|
1206 int stipple; |
25012 | 1207 |
1208 #else /* not HAVE_WINDOW_SYSTEM */ | |
1209 | |
1210 /* Dummy. */ | |
1211 int stipple; | |
1212 | |
1213 #endif /* not HAVE_WINDOW_SYSTEM */ | |
1214 | |
1215 /* Pixel value of foreground color for X frames. Color index | |
1216 for tty frames. */ | |
1217 unsigned long foreground; | |
1218 | |
1219 /* Pixel value or color index of background color. */ | |
1220 unsigned long background; | |
1221 | |
1222 /* Pixel value or color index of underline color. */ | |
1223 unsigned long underline_color; | |
1224 | |
1225 /* Pixel value or color index of overlined, strike-through, or box | |
1226 color. */ | |
1227 unsigned long overline_color; | |
1228 unsigned long strike_through_color; | |
1229 unsigned long box_color; | |
1230 | |
1231 /* The font's name. This points to a `name' of a font_info, and it | |
1232 must not be freed. */ | |
1233 char *font_name; | |
1234 | |
1235 /* Font info ID for this face's font. An ID is stored here because | |
1236 pointers to font_info structures may change. The reason is that | |
1237 they are pointers into a font table vector that is itself | |
1238 reallocated. */ | |
1239 int font_info_id; | |
1240 | |
1241 /* Fontset ID if this face uses a fontset, or -1. This is only >= 0 | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1242 if the face was realized for a composition sequence. |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1243 Otherwise, a specific font is loaded from the set of fonts |
25012 | 1244 specified by the fontset given by the family attribute of the face. */ |
1245 int fontset; | |
1246 | |
1247 /* Pixmap width and height. */ | |
1248 unsigned int pixmap_w, pixmap_h; | |
1249 | |
1250 /* Non-zero means characters in this face have a box that thickness | |
36007
6be98ede1ec8
(struct face): Add comment for how to handle a negative value in
Kenichi Handa <handa@m17n.org>
parents:
35912
diff
changeset
|
1251 around them. If it is negative, the absolute value indicates the |
6be98ede1ec8
(struct face): Add comment for how to handle a negative value in
Kenichi Handa <handa@m17n.org>
parents:
35912
diff
changeset
|
1252 thickness, and the horizontal lines of box (top and bottom) are |
6be98ede1ec8
(struct face): Add comment for how to handle a negative value in
Kenichi Handa <handa@m17n.org>
parents:
35912
diff
changeset
|
1253 drawn inside of characters glyph area. The vartical lines of box |
6be98ede1ec8
(struct face): Add comment for how to handle a negative value in
Kenichi Handa <handa@m17n.org>
parents:
35912
diff
changeset
|
1254 (left and right) are drawn as the same way as the case that this |
6be98ede1ec8
(struct face): Add comment for how to handle a negative value in
Kenichi Handa <handa@m17n.org>
parents:
35912
diff
changeset
|
1255 value is positive. */ |
25012 | 1256 int box_line_width; |
1257 | |
1258 /* Type of box drawn. A value of FACE_NO_BOX means no box is drawn | |
1259 around text in this face. A value of FACE_SIMPLE_BOX means a box | |
1260 of width box_line_width is drawn in color box_color. A value of | |
1261 FACE_RAISED_BOX or FACE_SUNKEN_BOX means a 3D box is drawn with | |
1262 shadow colors derived from the background color of the face. */ | |
1263 enum face_box_type box; | |
1264 | |
1265 /* If `box' above specifies a 3D type, 1 means use box_color for | |
1266 drawing shadows. */ | |
1267 unsigned use_box_color_for_shadows_p : 1; | |
1268 | |
1269 /* The Lisp face attributes this face realizes. All attributes | |
1270 in this vector are non-nil. */ | |
1271 Lisp_Object lface[LFACE_VECTOR_SIZE]; | |
1272 | |
1273 /* The hash value of this face. */ | |
1274 unsigned hash; | |
1275 | |
1276 /* The charset for which this face was realized if it was realized | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1277 for use in multibyte text. If fontset >= 0, this is the charset |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1278 of the first character of the composition sequence. A value of |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1279 charset < 0 means the face was realized for use in unibyte text |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1280 where the idea of Emacs charsets isn't applicable. */ |
25012 | 1281 int charset; |
1282 | |
1283 /* Non-zero if text in this face should be underlined, overlined, | |
1284 strike-through or have a box drawn around it. */ | |
1285 unsigned underline_p : 1; | |
1286 unsigned overline_p : 1; | |
1287 unsigned strike_through_p : 1; | |
1288 | |
1289 /* 1 means that the colors specified for this face could not be | |
1290 loaded, and were replaced by default colors, so they shouldn't be | |
1291 freed. */ | |
1292 unsigned foreground_defaulted_p : 1; | |
1293 unsigned background_defaulted_p : 1; | |
1294 | |
1295 /* 1 means that either no color is specified for underlining or that | |
1296 the the specified color couldn't be loaded. Use the foreground | |
1297 color when drawing in that case. */ | |
1298 unsigned underline_defaulted_p : 1; | |
1299 | |
1300 /* 1 means that either no color is specified for the corresponding | |
1301 attribute or that the the specified color couldn't be loaded. | |
1302 Use the foreground color when drawing in that case. */ | |
1303 unsigned overline_color_defaulted_p : 1; | |
1304 unsigned strike_through_color_defaulted_p : 1; | |
1305 unsigned box_color_defaulted_p : 1; | |
1306 | |
1307 /* TTY appearances. Blinking is not yet implemented. Colors are | |
1308 found in `lface' with empty color string meaning the default | |
1309 color of the TTY. */ | |
1310 unsigned tty_bold_p : 1; | |
1311 unsigned tty_dim_p : 1; | |
1312 unsigned tty_underline_p : 1; | |
1313 unsigned tty_alt_charset_p : 1; | |
1314 unsigned tty_reverse_p : 1; | |
1315 unsigned tty_blinking_p : 1; | |
1316 | |
1317 /* Next and previous face in hash collision list of face cache. */ | |
1318 struct face *next, *prev; | |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1319 |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1320 /* If this face is for ASCII characters, this points this face |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1321 itself. Otherwise, this points a face for ASCII characters. */ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1322 struct face *ascii_face; |
25012 | 1323 }; |
1324 | |
1325 | |
1326 /* Color index indicating that face uses a terminal's default color. */ | |
1327 | |
1328 #define FACE_TTY_DEFAULT_COLOR ((unsigned long) -1) | |
1329 | |
26902
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1330 /* Color index indicating that face uses an unknown foreground color. */ |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1331 |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1332 #define FACE_TTY_DEFAULT_FG_COLOR ((unsigned long) -2) |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1333 |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1334 /* Color index indicating that face uses an unsigned background color. */ |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1335 |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1336 #define FACE_TTY_DEFAULT_BG_COLOR ((unsigned long) -3) |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1337 |
25012 | 1338 /* Non-zero if FACE was realized for unibyte use. */ |
1339 | |
1340 #define FACE_UNIBYTE_P(FACE) ((FACE)->charset < 0) | |
1341 | |
1342 | |
1343 /* IDs of important faces known by the C face code. These are the IDs | |
1344 of the faces for CHARSET_ASCII. */ | |
1345 | |
1346 enum face_id | |
1347 { | |
1348 DEFAULT_FACE_ID, | |
1349 MODE_LINE_FACE_ID, | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
1350 TOOL_BAR_FACE_ID, |
25012 | 1351 BITMAP_AREA_FACE_ID, |
25546 | 1352 HEADER_LINE_FACE_ID, |
25589
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
1353 SCROLL_BAR_FACE_ID, |
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
1354 BORDER_FACE_ID, |
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
1355 CURSOR_FACE_ID, |
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
1356 MOUSE_FACE_ID, |
25881
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
1357 MENU_FACE_ID, |
25012 | 1358 BASIC_FACE_ID_SENTINEL |
1359 }; | |
1360 | |
1361 | |
1362 /* A cache of realized faces. Each frame has its own cache because | |
1363 Emacs allows different frame-local face definitions. */ | |
1364 | |
1365 struct face_cache | |
1366 { | |
1367 /* Hash table of cached realized faces. */ | |
1368 struct face **buckets; | |
1369 | |
1370 /* Back-pointer to the frame this cache belongs to. */ | |
1371 struct frame *f; | |
1372 | |
1373 /* A vector of faces so that faces can be referenced by an ID. */ | |
1374 struct face **faces_by_id; | |
1375 | |
1376 /* The allocated size, and number of used slots of faces_by_id. */ | |
1377 int size, used; | |
1378 }; | |
1379 | |
1380 | |
1381 /* Prepare face FACE for use on frame F. This must be called before | |
1382 using X resources of FACE. */ | |
1383 | |
1384 #define PREPARE_FACE_FOR_DISPLAY(F, FACE) \ | |
1385 if ((FACE)->gc == 0) \ | |
1386 prepare_face_for_display ((F), (FACE)); \ | |
1387 else \ | |
1388 (void) 0 | |
1389 | |
1390 /* Return a pointer to the face with ID on frame F, or null if such a | |
1391 face doesn't exist. */ | |
1392 | |
1393 #define FACE_FROM_ID(F, ID) \ | |
27002
0ce3afff8247
(FACE_FROM_ID): Cast the arg ID to `unsigned'.
Kenichi Handa <handa@m17n.org>
parents:
26997
diff
changeset
|
1394 (((unsigned) (ID) < FRAME_FACE_CACHE (F)->used) \ |
25012 | 1395 ? FRAME_FACE_CACHE (F)->faces_by_id[ID] \ |
1396 : NULL) | |
1397 | |
28254
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1398 #ifdef HAVE_WINDOW_SYSTEM |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1399 |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1400 /* Non-zero if FACE is suitable for displaying character CHAR. */ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1401 |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1402 #define FACE_SUITABLE_FOR_CHAR_P(FACE, CHAR) \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1403 (SINGLE_BYTE_CHAR_P (CHAR) \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1404 ? (FACE) == (FACE)->ascii_face \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1405 : face_suitable_for_char_p ((FACE), (CHAR))) |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1406 |
25012 | 1407 /* Return the id of the realized face on frame F that is like the face |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1408 with id ID but is suitable for displaying character CHAR. |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1409 This macro is only meaningful for multibyte character CHAR. */ |
25012 | 1410 |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1411 #define FACE_FOR_CHAR(F, FACE, CHAR) \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1412 (SINGLE_BYTE_CHAR_P (CHAR) \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1413 ? (FACE)->ascii_face->id \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1414 : face_for_char ((F), (FACE), (CHAR))) |
25012 | 1415 |
28254
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1416 #else /* not HAVE_WINDOW_SYSTEM */ |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1417 |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1418 #define FACE_SUITABLE_FOR_CHAR_P(FACE, CHAR) 1 |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1419 #define FACE_FOR_CHAR(F, FACE, CHAR) ((FACE)->id) |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1420 |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1421 #endif /* not HAVE_WINDOW_SYSTEM */ |
25012 | 1422 |
1423 /* Non-zero means face attributes have been changed since the last | |
1424 redisplay. Used in redisplay_internal. */ | |
1425 | |
1426 extern int face_change_count; | |
1427 | |
1428 | |
1429 | |
1430 | |
1431 /*********************************************************************** | |
1432 Display Iterator | |
1433 ***********************************************************************/ | |
1434 | |
1435 /* Iteration over things to display in current_buffer or in a string. | |
1436 | |
1437 The iterator handles: | |
1438 | |
1439 1. Overlay strings (after-string, before-string). | |
1440 2. Face properties. | |
1441 3. Invisible text properties. | |
1442 4. Selective display. | |
1443 5. Translation of characters via display tables. | |
1444 6. Translation of control characters to the forms `\003' or `^C'. | |
1445 7. `glyph' and `space-width' properties. | |
1446 | |
1447 Iterators are initialized by calling init_iterator or one of the | |
1448 equivalent functions below. A call to get_next_display_element | |
1449 loads the iterator structure with information about what next to | |
1450 display. A call to set_iterator_to_next increments the iterator's | |
1451 position. | |
1452 | |
1453 Characters from overlay strings, display table entries or control | |
1454 character translations are returned one at a time. For example, if | |
1455 we have a text of `a\x01' where `a' has a display table definition | |
1456 of `cd' and the control character is displayed with a leading | |
1457 arrow, then the iterator will return: | |
1458 | |
1459 Call Return Source Call next | |
1460 ----------------------------------------------------------------- | |
1461 next c display table move | |
1462 next d display table move | |
1463 next ^ control char move | |
1464 next A control char move | |
1465 | |
1466 The same mechanism is also used to return characters for ellipses | |
1467 displayed at the end of invisible text. | |
1468 | |
1469 CAVEAT: Under some circumstances, move_.* functions can be called | |
1470 asynchronously, e.g. when computing a buffer position from an x and | |
1471 y pixel position. This means that these functions and functions | |
1472 called from them SHOULD NOT USE xmalloc and alike. See also the | |
1473 comment at the start of xdisp.c. */ | |
1474 | |
1475 /* Enumeration describing what kind of display element an iterator is | |
1476 loaded with after a call to get_next_display_element. */ | |
1477 | |
1478 enum display_element_type | |
1479 { | |
1480 /* A normal character. */ | |
1481 IT_CHARACTER, | |
1482 | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1483 /* A composition sequence. */ |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1484 IT_COMPOSITION, |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1485 |
25012 | 1486 /* An image. */ |
1487 IT_IMAGE, | |
1488 | |
1489 /* A flexible width and height space. */ | |
1490 IT_STRETCH, | |
1491 | |
1492 /* End of buffer or string. */ | |
1493 IT_EOB, | |
1494 | |
1495 /* Truncation glyphs. Never returned by get_next_display_element. | |
1496 Used to get display information about truncation glyphs via | |
1497 produce_glyphs. */ | |
1498 IT_TRUNCATION, | |
1499 | |
1500 /* Continuation glyphs. See the comment for IT_TRUNCATION. */ | |
1501 IT_CONTINUATION | |
1502 }; | |
1503 | |
1504 | |
1505 /* An enumerator for each text property that has a meaning for display | |
1506 purposes. */ | |
1507 | |
1508 enum prop_idx | |
1509 { | |
1510 FONTIFIED_PROP_IDX, | |
1511 FACE_PROP_IDX, | |
1512 INVISIBLE_PROP_IDX, | |
1513 DISPLAY_PROP_IDX, | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1514 COMPOSITION_PROP_IDX, |
25012 | 1515 |
1516 /* Not a property. Used to indicate changes in overlays. */ | |
1517 OVERLAY_PROP_IDX, | |
1518 | |
1519 /* Sentinel. */ | |
1520 LAST_PROP_IDX | |
1521 }; | |
1522 | |
1523 | |
1524 struct it | |
1525 { | |
1526 /* The window in which we iterate over current_buffer (or a string). */ | |
1527 Lisp_Object window; | |
1528 struct window *w; | |
1529 | |
1530 /* The window's frame. */ | |
1531 struct frame *f; | |
1532 | |
1533 /* Function to call to load this structure with the next display | |
1534 element. */ | |
1535 int (* method) P_ ((struct it *it)); | |
1536 | |
1537 /* The next position at which to check for face changes, invisible | |
1538 text, overlay strings, end of text etc., which see. */ | |
1539 int stop_charpos; | |
1540 | |
1541 /* Maximum string or buffer position + 1. ZV when iterating over | |
1542 current_buffer. */ | |
1543 int end_charpos; | |
1544 | |
1545 /* C string to iterate over. Non-null means get characters from | |
1546 this string, otherwise characters are read from current_buffer | |
1547 or it->string. */ | |
1548 unsigned char *s; | |
1549 | |
1550 /* Number of characters in the string (s, or it->string) we iterate | |
1551 over. */ | |
1552 int string_nchars; | |
1553 | |
1554 /* Start and end of a visible region; -1 if the region is not | |
1555 visible in the window. */ | |
1556 int region_beg_charpos, region_end_charpos; | |
1557 | |
1558 /* Position at which redisplay end trigger functions should be run. */ | |
1559 int redisplay_end_trigger_charpos; | |
1560 | |
1561 /* 1 means multibyte characters are enabled. */ | |
1562 unsigned multibyte_p : 1; | |
1563 | |
1564 /* 1 means window has a mode line at its top. */ | |
25546 | 1565 unsigned header_line_p : 1; |
25012 | 1566 |
1567 /* 1 means `string' is the value of a `display' property. | |
1568 Don't handle some `display' properties in these strings. */ | |
1569 unsigned string_from_display_prop_p : 1; | |
1570 | |
1571 /* Display table in effect or null for none. */ | |
1572 struct Lisp_Char_Table *dp; | |
1573 | |
1574 /* Current display table vector to return characters from and its | |
1575 end. dpvec null means we are not returning characters from a | |
1576 display table entry; current.dpvec_index gives the current index | |
1577 into dpvec. This same mechanism is also used to return | |
1578 characters from translated control characters, i.e. `\003' or | |
1579 `^C'. */ | |
1580 Lisp_Object *dpvec, *dpend; | |
1581 | |
1582 /* Length in bytes of the char that filled dpvec. A value of zero | |
1583 means that no character such character is involved. */ | |
1584 int dpvec_char_len; | |
1585 | |
1586 /* Face id of the iterator saved in case a glyph from dpvec contains | |
1587 a face. The face is restored when all glyphs from dpvec have | |
1588 been delivered. */ | |
1589 int saved_face_id; | |
1590 | |
1591 /* Vector of glyphs for control character translation. The pointer | |
25503
bbb032f48e20
(struct it): Change the size of the member `ctl_chars'.
Kenichi Handa <handa@m17n.org>
parents:
25458
diff
changeset
|
1592 dpvec is set to ctl_chars when a control character is translated. |
bbb032f48e20
(struct it): Change the size of the member `ctl_chars'.
Kenichi Handa <handa@m17n.org>
parents:
25458
diff
changeset
|
1593 This vector is also used for incomplete multibyte character |
38550
f909f7fe9a65
(struct it): Increase size of ctl_chars to 16.
Gerd Moellmann <gerd@gnu.org>
parents:
38499
diff
changeset
|
1594 translation (e.g \222\244). Such a character is at most 4 bytes, |
f909f7fe9a65
(struct it): Increase size of ctl_chars to 16.
Gerd Moellmann <gerd@gnu.org>
parents:
38499
diff
changeset
|
1595 thus we need at most 16 bytes here. */ |
f909f7fe9a65
(struct it): Increase size of ctl_chars to 16.
Gerd Moellmann <gerd@gnu.org>
parents:
38499
diff
changeset
|
1596 Lisp_Object ctl_chars[16]; |
25012 | 1597 |
1598 /* Current buffer or string position of the iterator, including | |
1599 position in overlay strings etc. */ | |
1600 struct display_pos current; | |
1601 | |
1602 /* Vector of overlays to process. Overlay strings are processed | |
1603 OVERLAY_STRING_CHUNK_SIZE at a time. */ | |
1604 #define OVERLAY_STRING_CHUNK_SIZE 3 | |
1605 Lisp_Object overlay_strings[OVERLAY_STRING_CHUNK_SIZE]; | |
1606 | |
1607 /* Total number of overlay strings to process. This can be > | |
1608 OVERLAY_STRING_CHUNK_SIZE. */ | |
1609 int n_overlay_strings; | |
1610 | |
1611 /* If non-nil, a Lisp string being processed. If | |
1612 current.overlay_string_index >= 0, this is an overlay string from | |
1613 pos. */ | |
1614 Lisp_Object string; | |
1615 | |
1616 /* Stack of saved values. New entries are pushed when we begin to | |
1617 process an overlay string or a string from a `glyph' property. | |
1618 Entries are popped when we return to deliver display elements | |
1619 from what we previously had. */ | |
1620 struct iterator_stack_entry | |
1621 { | |
1622 int stop_charpos; | |
1623 int face_id; | |
1624 Lisp_Object string; | |
1625 struct display_pos pos; | |
1626 int end_charpos; | |
1627 int string_nchars; | |
1628 enum glyph_row_area area; | |
1629 unsigned multibyte_p : 1; | |
1630 unsigned string_from_display_prop_p : 1; | |
38189
770e48dacf6e
(struct it): Add member display_ellipsis_p.
Gerd Moellmann <gerd@gnu.org>
parents:
37628
diff
changeset
|
1631 unsigned display_ellipsis_p : 1; |
25012 | 1632 Lisp_Object space_width; |
1633 short voffset; | |
1634 Lisp_Object font_height; | |
1635 } | |
1636 stack[2]; | |
1637 | |
1638 /* Stack pointer. */ | |
1639 int sp; | |
1640 | |
1641 /* Setting of buffer-local variable selective-display-ellipsis. */ | |
1642 unsigned selective_display_ellipsis_p : 1; | |
1643 | |
1644 /* 1 means control characters are translated into the form `^C' | |
1645 where the `^' can be replaced by a display table entry. */ | |
1646 unsigned ctl_arrow_p : 1; | |
1647 | |
1648 /* -1 means selective display hides everything between a \r and the | |
1649 next newline; > 0 means hide lines indented more than that value. */ | |
1650 int selective; | |
1651 | |
1652 /* An enumeration describing what the next display element is | |
1653 after a call to get_next_display_element. */ | |
1654 enum display_element_type what; | |
1655 | |
1656 /* Face to use. */ | |
1657 int face_id; | |
1658 | |
1659 /* Non-zero means that the current face has a box. */ | |
1660 unsigned face_box_p : 1; | |
1661 | |
1662 /* Non-null means that the current character is the first in a run | |
1663 of characters with box face. */ | |
1664 unsigned start_of_box_run_p : 1; | |
1665 | |
1666 /* Non-zero means that the current character is the last in a run | |
1667 of characters with box face. */ | |
1668 unsigned end_of_box_run_p : 1; | |
1669 | |
1670 /* 1 means overlay strings at end_charpos have been processed. */ | |
1671 unsigned overlay_strings_at_end_processed_p : 1; | |
1672 | |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1673 /* 1 means the actual glyph is not available in the current |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1674 system. */ |
29474
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
1675 unsigned glyph_not_available_p : 1; |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
1676 |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
1677 /* 1 means the next line in display_line continues a character |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
1678 consisting of more than one glyph, and some glyphs of this |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
1679 character have been put on the previous line. */ |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
1680 unsigned starts_in_middle_of_char_p : 1; |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1681 |
34226
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
1682 /* If 1, saved_face_id contains the id of the face in front of text |
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
1683 skipped due to selective display. */ |
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
1684 unsigned face_before_selective_p : 1; |
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
1685 |
25012 | 1686 /* The ID of the default face to use. One of DEFAULT_FACE_ID, |
34226
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
1687 MODE_LINE_FACE_ID, etc, depending on what we are displaying. */ |
25012 | 1688 int base_face_id; |
1689 | |
1690 /* If what == IT_CHARACTER, character and length in bytes. This is | |
1691 a character from a buffer or string. It may be different from | |
1692 the character displayed in case that | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1693 unibyte_display_via_language_environment is set. |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1694 |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1695 If what == IT_COMPOSITION, the first component of a composition |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1696 and length in bytes of the composition. */ |
25012 | 1697 int c, len; |
1698 | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1699 /* If what == IT_COMPOSITION, identification number and length in |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1700 chars of a composition. */ |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1701 int cmp_id, cmp_len; |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1702 |
25012 | 1703 /* The character to display, possibly translated to multibyte |
1704 if unibyte_display_via_language_environment is set. This | |
1705 is set after x_produce_glyphs has been called. */ | |
1706 int char_to_display; | |
1707 | |
1708 /* If what == IT_IMAGE, the id of the image to display. */ | |
1709 int image_id; | |
1710 | |
1711 /* Value of the `space-width' property, if any; nil if none. */ | |
1712 Lisp_Object space_width; | |
1713 | |
1714 /* Computed from the value of the `raise' property. */ | |
1715 short voffset; | |
1716 | |
1717 /* Value of the `height' property, if any; nil if none. */ | |
1718 Lisp_Object font_height; | |
1719 | |
1720 /* Object and position where the current display element came from. | |
1721 Object can be a Lisp string in case the current display element | |
1722 comes from an overlay string, or it is buffer. Position is | |
1723 a position in object. */ | |
1724 Lisp_Object object; | |
1725 struct text_pos position; | |
1726 | |
1727 /* 1 means lines are truncated. */ | |
1728 unsigned truncate_lines_p : 1; | |
1729 | |
1730 /* Number of columns per \t. */ | |
1731 short tab_width; | |
1732 | |
1733 /* Width in pixels of truncation and continuation glyphs. */ | |
1734 short truncation_pixel_width, continuation_pixel_width; | |
1735 | |
1736 /* First and last visible x-position in the display area. If window | |
1737 is hscrolled by n columns, first_visible_x == n * CANON_X_UNIT | |
1738 (f), and last_visible_x == pixel width of W + first_visible_x. */ | |
1739 int first_visible_x, last_visible_x; | |
1740 | |
1741 /* Last visible y-position + 1 in the display area without a mode | |
1742 line, if the window has one. */ | |
1743 int last_visible_y; | |
1744 | |
28684
609d4aabf72c
(struct it): Remove member prompt_width, add extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents:
28417
diff
changeset
|
1745 /* Additional space in pixels between lines (for window systems |
609d4aabf72c
(struct it): Remove member prompt_width, add extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents:
28417
diff
changeset
|
1746 only.). */ |
609d4aabf72c
(struct it): Remove member prompt_width, add extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents:
28417
diff
changeset
|
1747 int extra_line_spacing; |
25012 | 1748 |
1749 /* If non-null, glyphs are produced in glyph_row with each call to | |
1750 produce_glyphs. */ | |
1751 struct glyph_row *glyph_row; | |
1752 | |
1753 /* The area of glyph_row to which glyphs are added. */ | |
1754 enum glyph_row_area area; | |
1755 | |
1756 /* Number of glyphs needed for the last character requested via | |
1757 produce_glyphs. This is 1 except for tabs. */ | |
1758 int nglyphs; | |
1759 | |
1760 /* Width of the display element in pixels. Result of | |
1761 produce_glyphs. */ | |
1762 int pixel_width; | |
1763 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1764 /* Current, maximum logical, and maximum physical line height |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1765 information. Result of produce_glyphs. */ |
25012 | 1766 int ascent, descent, max_ascent, max_descent; |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1767 int phys_ascent, phys_descent, max_phys_ascent, max_phys_descent; |
25012 | 1768 |
1769 /* Current x pixel position within the display line. This value | |
1770 does not include the width of continuation lines in front of the | |
1771 line. The value of current_x is automatically incremented by | |
1772 pixel_width with each call to produce_glyphs. */ | |
1773 int current_x; | |
1774 | |
1775 /* Accumulated width of continuation lines. If > 0, this means we | |
1776 are currently in a continuation line. This is initially zero and | |
1777 incremented/reset by display_line, move_it_to etc. */ | |
1778 int continuation_lines_width; | |
1779 | |
1780 /* Current y-position. Automatically incremented by the height of | |
1781 glyph_row in move_it_to and display_line. */ | |
1782 int current_y; | |
1783 | |
1784 /* Current vertical matrix position, or line number. Automatically | |
1785 incremented by move_it_to and display_line. */ | |
1786 int vpos; | |
1787 | |
1788 /* Horizontal matrix position reached in move_it_in_display_line. | |
1789 Only set there, not in display_line. */ | |
1790 int hpos; | |
1791 }; | |
1792 | |
1793 | |
1794 /* Access to positions of iterator IT. */ | |
1795 | |
1796 #define IT_CHARPOS(IT) CHARPOS ((IT).current.pos) | |
1797 #define IT_BYTEPOS(IT) BYTEPOS ((IT).current.pos) | |
1798 #define IT_STRING_CHARPOS(IT) CHARPOS ((IT).current.string_pos) | |
1799 #define IT_STRING_BYTEPOS(IT) BYTEPOS ((IT).current.string_pos) | |
1800 | |
1801 /* Test if IT has reached the end of its buffer or string. This will | |
1802 only work after get_next_display_element has been called. */ | |
1803 | |
1804 #define ITERATOR_AT_END_P(IT) ((IT)->what == IT_EOB) | |
1805 | |
1806 /* Non-zero means IT is at the end of a line. This is the case if it | |
1807 is either on a newline or on a carriage return and selective | |
1808 display hides the rest of the line. */ | |
1809 | |
1810 #define ITERATOR_AT_END_OF_LINE_P(IT) \ | |
1811 ((IT)->what == IT_CHARACTER \ | |
1812 && ((IT)->c == '\n' \ | |
1813 || ((IT)->c == '\r' && (IT)->selective))) | |
1814 | |
1815 /* Call produce_glyphs or produce_glyphs_hook, if set. Shortcut to | |
1816 avoid the function call overhead. */ | |
1817 | |
1818 #define PRODUCE_GLYPHS(IT) \ | |
1819 (rif \ | |
1820 ? rif->produce_glyphs ((IT)) \ | |
1821 : produce_glyphs ((IT))) | |
1822 | |
1823 /* Bit-flags indicating what operation move_it_to should perform. */ | |
1824 | |
1825 enum move_operation_enum | |
1826 { | |
1827 /* Stop if specified x-position is reached. */ | |
1828 MOVE_TO_X = 0x01, | |
1829 | |
1830 /* Stop if specified y-position is reached. */ | |
1831 MOVE_TO_Y = 0x02, | |
1832 | |
1833 /* Stop if specified vpos is reached. */ | |
1834 MOVE_TO_VPOS = 0x04, | |
1835 | |
1836 /* Stop if specified buffer or string position is reached. */ | |
1837 MOVE_TO_POS = 0x08 | |
1838 }; | |
1839 | |
1840 | |
1841 | |
1842 /*********************************************************************** | |
1843 Window-based redisplay interface | |
1844 ***********************************************************************/ | |
1845 | |
1846 /* Structure used to describe runs of lines that must be scrolled. */ | |
1847 | |
1848 struct run | |
1849 { | |
1850 /* Source and destination y pixel position. */ | |
1851 int desired_y, current_y; | |
1852 | |
1853 /* Source and destination vpos in matrix. */ | |
1854 int desired_vpos, current_vpos; | |
1855 | |
1856 /* Height in pixels, number of glyph rows. */ | |
1857 int height, nrows; | |
1858 }; | |
1859 | |
1860 | |
1861 /* Structure holding system-dependent interface functions needed | |
1862 for window-based redisplay. */ | |
1863 | |
1864 struct redisplay_interface | |
1865 { | |
1866 /* Produce glyphs/get display metrics for the display element IT is | |
1867 loaded with. */ | |
1868 void (*produce_glyphs) P_ ((struct it *it)); | |
1869 | |
1870 /* Write or insert LEN glyphs from STRING at the nominal output | |
1871 position. */ | |
1872 void (*write_glyphs) P_ ((struct glyph *string, int len)); | |
1873 void (*insert_glyphs) P_ ((struct glyph *start, int len)); | |
1874 | |
1875 /* Clear from nominal output position to X. X < 0 means clear | |
1876 to right end of display. */ | |
1877 void (*clear_end_of_line) P_ ((int x)); | |
1878 | |
1879 /* Function to call to scroll the display as described by RUN on | |
1880 window W. */ | |
1881 void (*scroll_run_hook) P_ ((struct window *w, struct run *run)); | |
1882 | |
1883 /* Function to call after a line in a display has been completely | |
1884 updated. Used to draw truncation marks and alike. DESIRED_ROW | |
1885 is the desired row which has been updated. */ | |
1886 void (*after_update_window_line_hook) P_ ((struct glyph_row *desired_row)); | |
1887 | |
1888 /* Function to call before beginning to update window W in | |
1889 window-based redisplay. */ | |
1890 void (*update_window_begin_hook) P_ ((struct window *w)); | |
1891 | |
1892 /* Function to call after window W has been updated in window-based | |
30162
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
1893 redisplay. CURSOR_ON_P non-zero means switch cursor on. |
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
1894 MOUSE_FACE_OVERWRITTEN_P non-zero means that some lines in W |
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
1895 that contained glyphs in mouse-face were overwritten, so we |
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
1896 have to update the mouse hightlight. */ |
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
1897 void (*update_window_end_hook) P_ ((struct window *w, int cursor_on_p, |
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
1898 int mouse_face_overwritten_p)); |
25012 | 1899 |
1900 /* Move cursor to row/column position VPOS/HPOS, pixel coordinates | |
1901 Y/X. HPOS/VPOS are window-relative row and column numbers and X/Y | |
1902 are window-relative pixel positions. */ | |
1903 void (*cursor_to) P_ ((int vpos, int hpos, int y, int x)); | |
1904 | |
1905 /* Flush the display of frame F. For X, this is XFlush. */ | |
1906 void (*flush_display) P_ ((struct frame *f)); | |
1907 | |
30343
21d1c542f98e
Correct a typo in a comment.
Eli Zaretskii <eliz@gnu.org>
parents:
30225
diff
changeset
|
1908 /* Clear the mouse hightlight in window W, if there is any. */ |
30162
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
1909 void (*clear_mouse_face) P_ ((struct window *w)); |
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
1910 |
25012 | 1911 /* Set *LEFT and *RIGHT to the left and right overhang of GLYPH on |
1912 frame F. */ | |
1913 void (*get_glyph_overhangs) P_ ((struct glyph *glyph, struct frame *f, | |
1914 int *left, int *right)); | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1915 |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1916 /* Fix the display of AREA of ROW in window W for overlapping rows. |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1917 This function is called from redraw_overlapping_rows after |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1918 desired rows have been made current. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1919 void (*fix_overlapping_area) P_ ((struct window *w, struct glyph_row *row, |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1920 enum glyph_row_area area)); |
25012 | 1921 }; |
1922 | |
1923 /* The current interface for window-based redisplay. */ | |
1924 | |
1925 extern struct redisplay_interface *rif; | |
1926 | |
1927 /* Hook to call in estimate_mode_line_height. */ | |
1928 | |
1929 extern int (* estimate_mode_line_height_hook) P_ ((struct frame *, | |
1930 enum face_id)); | |
1931 | |
1932 | |
1933 /*********************************************************************** | |
1934 Images | |
1935 ***********************************************************************/ | |
1936 | |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
1937 #ifdef HAVE_WINDOW_SYSTEM |
25012 | 1938 |
1939 /* Structure forward declarations. */ | |
1940 | |
1941 struct image; | |
1942 | |
1943 | |
1944 /* Each image format (JPEG, IIFF, ...) supported is described by | |
1945 a structure of the type below. */ | |
1946 | |
1947 struct image_type | |
1948 { | |
1949 /* A symbol uniquely identifying the image type, .e.g `jpeg'. */ | |
1950 Lisp_Object *type; | |
1951 | |
1952 /* Check that SPEC is a valid image specification for the given | |
1953 image type. Value is non-zero if SPEC is valid. */ | |
1954 int (* valid_p) P_ ((Lisp_Object spec)); | |
1955 | |
1956 /* Load IMG which is used on frame F from information contained in | |
1957 IMG->spec. Value is non-zero if successful. */ | |
1958 int (* load) P_ ((struct frame *f, struct image *img)); | |
1959 | |
1960 /* Free resources of image IMG which is used on frame F. */ | |
1961 void (* free) P_ ((struct frame *f, struct image *img)); | |
1962 | |
1963 /* Next in list of all supported image types. */ | |
1964 struct image_type *next; | |
1965 }; | |
1966 | |
1967 | |
1968 /* Structure describing an image. Specific image formats like XBM are | |
1969 converted into this form, so that display only has to deal with | |
1970 this type of image. */ | |
1971 | |
1972 struct image | |
1973 { | |
1974 /* The time in seconds at which the image was last displayed. Set | |
1975 in prepare_image_for_display. */ | |
1976 unsigned long timestamp; | |
1977 | |
1978 /* Pixmaps of the image. */ | |
1979 Pixmap pixmap, mask; | |
1980 | |
1981 /* Colors allocated for this image, if any. Allocated via xmalloc. */ | |
1982 unsigned long *colors; | |
1983 int ncolors; | |
1984 | |
1985 /* Width and height of the image. */ | |
1986 int width, height; | |
1987 | |
1988 /* These values are used for the rectangles displayed for images | |
1989 that can't be loaded. */ | |
1990 #define DEFAULT_IMAGE_WIDTH 30 | |
1991 #define DEFAULT_IMAGE_HEIGHT 30 | |
1992 | |
28786
e18bbe250122
(DEFAULT_IMAGE_HEIGHT): New macro.
Gerd Moellmann <gerd@gnu.org>
parents:
28707
diff
changeset
|
1993 /* Percent of image height used as ascent. A value of |
e18bbe250122
(DEFAULT_IMAGE_HEIGHT): New macro.
Gerd Moellmann <gerd@gnu.org>
parents:
28707
diff
changeset
|
1994 CENTERED_IMAGE_ASCENT means draw center the image centered on the |
e18bbe250122
(DEFAULT_IMAGE_HEIGHT): New macro.
Gerd Moellmann <gerd@gnu.org>
parents:
28707
diff
changeset
|
1995 line. */ |
25012 | 1996 int ascent; |
1997 #define DEFAULT_IMAGE_ASCENT 50 | |
28786
e18bbe250122
(DEFAULT_IMAGE_HEIGHT): New macro.
Gerd Moellmann <gerd@gnu.org>
parents:
28707
diff
changeset
|
1998 #define CENTERED_IMAGE_ASCENT -1 |
25012 | 1999 |
2000 /* Lisp specification of this image. */ | |
2001 Lisp_Object spec; | |
2002 | |
2003 /* Relief to draw around the image. */ | |
2004 int relief; | |
2005 | |
35274
bc2b88ed2fa1
(struct image): Replace member `margin' with
Gerd Moellmann <gerd@gnu.org>
parents:
35054
diff
changeset
|
2006 /* Optional margins around the image. This includes the relief. */ |
bc2b88ed2fa1
(struct image): Replace member `margin' with
Gerd Moellmann <gerd@gnu.org>
parents:
35054
diff
changeset
|
2007 int hmargin, vmargin; |
25012 | 2008 |
2009 /* Reference to the type of the image. */ | |
2010 struct image_type *type; | |
2011 | |
25954
ab0d41b6f746
(struct image): New member load_failed_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25881
diff
changeset
|
2012 /* 1 means that loading the image failed. Don't try again. */ |
ab0d41b6f746
(struct image): New member load_failed_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25881
diff
changeset
|
2013 unsigned load_failed_p; |
ab0d41b6f746
(struct image): New member load_failed_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25881
diff
changeset
|
2014 |
25012 | 2015 /* A place for image types to store additional data. The member |
2016 data.lisp_val is marked during GC, so it's safe to store Lisp data | |
2017 there. Image types should free this data when their `free' | |
2018 function is called. */ | |
2019 struct | |
2020 { | |
2021 int int_val; | |
2022 void *ptr_val; | |
2023 Lisp_Object lisp_val; | |
2024 } data; | |
2025 | |
2026 /* Hash value of image specification to speed up comparisons. */ | |
2027 unsigned hash; | |
2028 | |
2029 /* Image id of this image. */ | |
2030 int id; | |
2031 | |
2032 /* Hash collision chain. */ | |
2033 struct image *next, *prev; | |
2034 }; | |
2035 | |
2036 | |
2037 /* Cache of images. Each frame has a cache. X frames with the same | |
2038 x_display_info share their caches. */ | |
2039 | |
2040 struct image_cache | |
2041 { | |
2042 /* Hash table of images. */ | |
2043 struct image **buckets; | |
2044 | |
2045 /* Vector mapping image ids to images. */ | |
2046 struct image **images; | |
2047 | |
2048 /* Allocated size of `images'. */ | |
2049 unsigned size; | |
2050 | |
2051 /* Number of images in the cache. */ | |
2052 unsigned used; | |
2053 | |
2054 /* Reference count (number of frames sharing this cache). */ | |
2055 int refcount; | |
2056 }; | |
2057 | |
2058 | |
2059 /* Value is a pointer to the image with id ID on frame F, or null if | |
2060 no image with that id exists. */ | |
2061 | |
2062 #define IMAGE_FROM_ID(F, ID) \ | |
2063 (((ID) >= 0 && (ID) < (FRAME_X_IMAGE_CACHE (F)->used)) \ | |
2064 ? FRAME_X_IMAGE_CACHE (F)->images[ID] \ | |
2065 : NULL) | |
2066 | |
2067 /* Size of bucket vector of image caches. Should be prime. */ | |
2068 | |
2069 #define IMAGE_CACHE_BUCKETS_SIZE 1001 | |
2070 | |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2071 #endif /* HAVE_WINDOW_SYSTEM */ |
25012 | 2072 |
2073 | |
2074 | |
2075 /*********************************************************************** | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2076 Tool-bars |
25012 | 2077 ***********************************************************************/ |
2078 | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2079 /* Enumeration defining where to find tool-bar item information in |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2080 tool-bar items vectors stored with frames. Each tool-bar item |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2081 occupies TOOL_BAR_ITEM_NSLOTS elements in such a vector. */ |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2082 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2083 enum tool_bar_item_idx |
25012 | 2084 { |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2085 /* The key of the tool-bar item. Used to remove items when a binding |
25012 | 2086 for `undefined' is found. */ |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2087 TOOL_BAR_ITEM_KEY, |
25012 | 2088 |
2089 /* Non-nil if item is enabled. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2090 TOOL_BAR_ITEM_ENABLED_P, |
25012 | 2091 |
2092 /* Non-nil if item is selected (pressed). */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2093 TOOL_BAR_ITEM_SELECTED_P, |
25012 | 2094 |
2095 /* Caption. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2096 TOOL_BAR_ITEM_CAPTION, |
25012 | 2097 |
2098 /* Image(s) to display. This is either a single image specification | |
2099 or a vector of specifications. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2100 TOOL_BAR_ITEM_IMAGES, |
25012 | 2101 |
2102 /* The binding. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2103 TOOL_BAR_ITEM_BINDING, |
25012 | 2104 |
2105 /* Button type. One of nil, `:radio' or `:toggle'. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2106 TOOL_BAR_ITEM_TYPE, |
25012 | 2107 |
2108 /* Help string. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2109 TOOL_BAR_ITEM_HELP, |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2110 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2111 /* Sentinel = number of slots in tool_bar_items occupied by one |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2112 tool-bar item. */ |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2113 TOOL_BAR_ITEM_NSLOTS |
25012 | 2114 }; |
2115 | |
2116 | |
2117 /* An enumeration for the different images that can be specified | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2118 for a tool-bar item. */ |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2119 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2120 enum tool_bar_item_image |
25012 | 2121 { |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2122 TOOL_BAR_IMAGE_ENABLED_SELECTED, |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2123 TOOL_BAR_IMAGE_ENABLED_DESELECTED, |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2124 TOOL_BAR_IMAGE_DISABLED_SELECTED, |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2125 TOOL_BAR_IMAGE_DISABLED_DESELECTED |
25012 | 2126 }; |
2127 | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2128 /* Non-zero means raise tool-bar buttons when the mouse moves over them. */ |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2129 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2130 extern int auto_raise_tool_bar_buttons_p; |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2131 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2132 /* Margin around tool-bar buttons in pixels. */ |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2133 |
35732
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2134 extern Lisp_Object Vtool_bar_button_margin; |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2135 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2136 /* Thickness of relief to draw around tool-bar buttons. */ |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2137 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2138 extern int tool_bar_button_relief; |
25012 | 2139 |
35732
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2140 /* Default values of the above variables. */ |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2141 |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2142 #define DEFAULT_TOOL_BAR_BUTTON_MARGIN 1 |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2143 #define DEFAULT_TOOL_BAR_BUTTON_RELIEF 3 |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2144 |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2145 /* The height in pixels of the default tool-bar images. */ |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2146 |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2147 #define DEFAULT_TOOL_BAR_IMAGE_HEIGHT 24 |
25012 | 2148 |
2149 | |
2150 /*********************************************************************** | |
2151 Function Prototypes | |
2152 ***********************************************************************/ | |
2153 | |
2154 /* Defined in xdisp.c */ | |
2155 | |
36702
e6d6ef7e0aef
(string_buffer_position): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36696
diff
changeset
|
2156 int string_buffer_position P_ ((struct window *, Lisp_Object, int)); |
36200
ede1d6e9b322
(line_bottom_y): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36007
diff
changeset
|
2157 int line_bottom_y P_ ((struct it *)); |
29818
34438531b886
(display_prop_intangible_p): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
29474
diff
changeset
|
2158 int display_prop_intangible_p P_ ((Lisp_Object)); |
25655
a75be4927319
Change prototype of resize_mini_window.
Gerd Moellmann <gerd@gnu.org>
parents:
25589
diff
changeset
|
2159 void resize_echo_area_axactly P_ ((void)); |
a75be4927319
Change prototype of resize_mini_window.
Gerd Moellmann <gerd@gnu.org>
parents:
25589
diff
changeset
|
2160 int resize_mini_window P_ ((struct window *, int)); |
25012 | 2161 int try_window P_ ((Lisp_Object, struct text_pos)); |
2162 void window_box P_ ((struct window *, int, int *, int *, int *, int *)); | |
2163 int window_box_height P_ ((struct window *)); | |
2164 int window_text_bottom_y P_ ((struct window *)); | |
2165 int window_box_width P_ ((struct window *, int)); | |
2166 int window_box_left P_ ((struct window *, int)); | |
2167 int window_box_right P_ ((struct window *, int)); | |
2168 void window_box_edges P_ ((struct window *, int, int *, int *, int *, int *)); | |
2169 void mark_window_display_accurate P_ ((Lisp_Object, int)); | |
35335
b5a39d371511
(redisplay_preserve_echo_area): Change prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
35274
diff
changeset
|
2170 void redisplay_preserve_echo_area P_ ((int)); |
25012 | 2171 void set_cursor_from_row P_ ((struct window *, struct glyph_row *, |
2172 struct glyph_matrix *, int, int, int, int)); | |
2173 void init_iterator P_ ((struct it *, struct window *, int, | |
2174 int, struct glyph_row *, enum face_id)); | |
2175 void init_iterator_to_row_start P_ ((struct it *, struct window *, | |
2176 struct glyph_row *)); | |
2177 int get_next_display_element P_ ((struct it *)); | |
32459
bf88937fd880
(struct it): Remove member add_overlay_start.
Gerd Moellmann <gerd@gnu.org>
parents:
32000
diff
changeset
|
2178 void set_iterator_to_next P_ ((struct it *, int)); |
25012 | 2179 void produce_glyphs P_ ((struct it *)); |
2180 void produce_special_glyphs P_ ((struct it *, enum display_element_type)); | |
2181 void start_display P_ ((struct it *, struct window *, struct text_pos)); | |
2182 void move_it_to P_ ((struct it *, int, int, int, int, int)); | |
2183 void move_it_vertically P_ ((struct it *, int)); | |
35054
3efcaab7433e
(move_it_vertically_backward): Declare.
Dave Love <fx@gnu.org>
parents:
35022
diff
changeset
|
2184 void move_it_vertically_backward P_ ((struct it *, int)); |
25012 | 2185 void move_it_by_lines P_ ((struct it *, int, int)); |
35022
84d10a56a40b
(move_it_past_eol): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
34800
diff
changeset
|
2186 void move_it_past_eol P_ ((struct it *)); |
25012 | 2187 int frame_mode_line_height P_ ((struct frame *)); |
2188 void highlight_trailing_whitespace P_ ((struct frame *, struct glyph_row *)); | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2189 int tool_bar_item_info P_ ((struct frame *, struct glyph *, int *)); |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2190 extern Lisp_Object Qtool_bar; |
25303 | 2191 extern Lisp_Object Vshow_trailing_whitespace; |
25012 | 2192 extern int redisplaying_p; |
28985
159b3efa8557
(Vimage_types): Add extern declaration.
Gerd Moellmann <gerd@gnu.org>
parents:
28786
diff
changeset
|
2193 extern Lisp_Object Vimage_types; |
25796
952b7a2a3d91
Add prototype for add_to_log.
Gerd Moellmann <gerd@gnu.org>
parents:
25708
diff
changeset
|
2194 extern void add_to_log P_ ((char *, Lisp_Object, Lisp_Object)); |
31875
11ea7b711a85
(help_echo_showing_p): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31177
diff
changeset
|
2195 extern int help_echo_showing_p; |
33460 | 2196 extern int current_mode_line_height, current_header_line_height; |
34492
c0363a97e5cb
(cursor_in_non_selected_windows): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
34447
diff
changeset
|
2197 extern int cursor_in_non_selected_windows; |
25012 | 2198 |
2199 /* Defined in sysdep.c */ | |
2200 | |
2201 void get_frame_size P_ ((int *, int *)); | |
2202 void request_sigio P_ ((void)); | |
2203 void unrequest_sigio P_ ((void)); | |
2204 int tabs_safe_p P_ ((void)); | |
2205 void init_baud_rate P_ ((void)); | |
2206 void init_sigio P_ ((int)); | |
2207 | |
25881
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
2208 /* Defined in xfaces.c */ |
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
2209 |
27961
c6664d216f5a
(x_free_colors): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
27859
diff
changeset
|
2210 #ifdef HAVE_X_WINDOWS |
c6664d216f5a
(x_free_colors): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
27859
diff
changeset
|
2211 void x_free_colors P_ ((struct frame *, unsigned long *, int)); |
c6664d216f5a
(x_free_colors): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
27859
diff
changeset
|
2212 #endif |
25012 | 2213 |
25589
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
2214 void update_face_from_frame_parameter P_ ((struct frame *, Lisp_Object, |
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
2215 Lisp_Object)); |
26766
b4c45cb99850
Oops, forgot to commit the change in dispextern.h together with the
Eli Zaretskii <eliz@gnu.org>
parents:
25954
diff
changeset
|
2216 Lisp_Object tty_color_name P_ ((struct frame *, int)); |
25012 | 2217 void clear_face_cache P_ ((int)); |
25119
04c0fc908742
(load_color, lookup_derived_face): Declare
Eli Zaretskii <eliz@gnu.org>
parents:
25081
diff
changeset
|
2218 unsigned long load_color P_ ((struct frame *, struct face *, Lisp_Object, |
04c0fc908742
(load_color, lookup_derived_face): Declare
Eli Zaretskii <eliz@gnu.org>
parents:
25081
diff
changeset
|
2219 enum lface_attribute_index)); |
25012 | 2220 void unload_color P_ ((struct frame *, unsigned long)); |
2221 int frame_update_line_height P_ ((struct frame *)); | |
2222 int ascii_face_of_lisp_face P_ ((struct frame *, int)); | |
2223 void prepare_face_for_display P_ ((struct frame *, struct face *)); | |
2224 int xstricmp P_ ((unsigned char *, unsigned char *)); | |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
2225 int lookup_face P_ ((struct frame *, Lisp_Object *, int, struct face *)); |
25012 | 2226 int lookup_named_face P_ ((struct frame *, Lisp_Object, int)); |
2227 int smaller_face P_ ((struct frame *, int, int)); | |
2228 int face_with_height P_ ((struct frame *, int, int)); | |
25119
04c0fc908742
(load_color, lookup_derived_face): Declare
Eli Zaretskii <eliz@gnu.org>
parents:
25081
diff
changeset
|
2229 int lookup_derived_face P_ ((struct frame *, Lisp_Object, int, int)); |
25012 | 2230 void init_frame_faces P_ ((struct frame *)); |
2231 void free_frame_faces P_ ((struct frame *)); | |
2232 void recompute_basic_faces P_ ((struct frame *)); | |
2233 int face_at_buffer_position P_ ((struct window *, int, int, int, int *, | |
2234 int, int)); | |
36671
b5aa229bcb18
(face_at_string_position): Change prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36250
diff
changeset
|
2235 int face_at_string_position P_ ((struct window *, Lisp_Object, int, int, int, |
b5aa229bcb18
(face_at_string_position): Change prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36250
diff
changeset
|
2236 int, int *, enum face_id, int)); |
25012 | 2237 int compute_char_face P_ ((struct frame *, int, Lisp_Object)); |
2238 void free_all_realized_faces P_ ((Lisp_Object)); | |
2239 extern Lisp_Object Qforeground_color, Qbackground_color; | |
32543
4ea276abceba
(unspecified_fg, unspecified_bg): Declare.
Eli Zaretskii <eliz@gnu.org>
parents:
32459
diff
changeset
|
2240 extern char unspecified_fg[], unspecified_bg[]; |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
2241 void free_realized_multibyte_face P_ ((struct frame *, int)); |
25012 | 2242 |
2243 /* Defined in xfns.c */ | |
2244 | |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2245 #ifdef HAVE_X_WINDOWS |
25708
a6aabf050a60
Add prototypes for gamma_correct and
Gerd Moellmann <gerd@gnu.org>
parents:
25655
diff
changeset
|
2246 void gamma_correct P_ ((struct frame *, XColor *)); |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2247 #endif |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2248 #ifdef WINDOWSNT |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2249 void gamma_correct P_ ((struct frame *, COLORREF *)); |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2250 #endif |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2251 |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2252 #ifdef HAVE_WINDOW_SYSTEM |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2253 |
25708
a6aabf050a60
Add prototypes for gamma_correct and
Gerd Moellmann <gerd@gnu.org>
parents:
25655
diff
changeset
|
2254 void x_kill_gs_process P_ ((Pixmap, struct frame *)); |
25012 | 2255 int x_screen_planes P_ ((struct frame *)); |
2256 void x_implicitly_set_name P_ ((struct frame *, Lisp_Object, Lisp_Object)); | |
2257 struct image_cache *make_image_cache P_ ((void)); | |
2258 void free_image_cache P_ ((struct frame *)); | |
2259 void clear_image_cache P_ ((struct frame *, int)); | |
2260 void forall_images_in_image_cache P_ ((struct frame *, | |
2261 void (*) P_ ((struct image *)))); | |
2262 int valid_image_p P_ ((Lisp_Object)); | |
2263 void prepare_image_for_display P_ ((struct frame *, struct image *)); | |
2264 int lookup_image P_ ((struct frame *, Lisp_Object)); | |
34447
387e9f41661e
Change external declaration of tip_frame.
Gerd Moellmann <gerd@gnu.org>
parents:
34280
diff
changeset
|
2265 extern Lisp_Object tip_frame; |
25012 | 2266 extern Window tip_window; |
30225
2e0e027ab8f8
(Fx_show_tip): Adjust number of parameters
Gerd Moellmann <gerd@gnu.org>
parents:
30162
diff
changeset
|
2267 EXFUN (Fx_show_tip, 6); |
25012 | 2268 EXFUN (Fx_hide_tip, 0); |
36250
3c4e5b3d7c4a
(start_hourglass, cancel_hourglass)
Gerd Moellmann <gerd@gnu.org>
parents:
36200
diff
changeset
|
2269 extern void start_hourglass P_ ((void)); |
3c4e5b3d7c4a
(start_hourglass, cancel_hourglass)
Gerd Moellmann <gerd@gnu.org>
parents:
36200
diff
changeset
|
2270 extern void cancel_hourglass P_ ((void)); |
3c4e5b3d7c4a
(start_hourglass, cancel_hourglass)
Gerd Moellmann <gerd@gnu.org>
parents:
36200
diff
changeset
|
2271 extern int display_hourglass_p; |
25012 | 2272 |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2273 #endif /* HAVE_WINDOW_SYSTEM */ |
25012 | 2274 |
2275 | |
2276 /* Defined in xmenu.c */ | |
2277 | |
2278 int popup_activated P_ ((void)); | |
2279 | |
25344
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2280 /* Defined in dispnew.c */ |
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2281 |
37609
c6d7c9d92543
(inverse_video): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
36937
diff
changeset
|
2282 extern int inverse_video; |
25344
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2283 int estimate_mode_line_height P_ ((struct frame *, enum face_id)); |
25012 | 2284 Lisp_Object mode_line_string P_ ((struct window *, int, int, int, int *)); |
21515 | 2285 extern void redraw_frame P_ ((struct frame *)); |
2286 extern void redraw_garbaged_frames P_ ((void)); | |
2287 extern void cancel_line P_ ((int, struct frame *)); | |
2288 extern void init_desired_glyphs P_ ((struct frame *)); | |
2289 extern int scroll_frame_lines P_ ((struct frame *, int, int, int, int)); | |
2290 extern int direct_output_for_insert P_ ((int)); | |
2291 extern int direct_output_forward_char P_ ((int)); | |
2292 extern int update_frame P_ ((struct frame *, int, int)); | |
2293 extern int scrolling P_ ((struct frame *)); | |
2294 extern void bitch_at_user P_ ((void)); | |
25012 | 2295 void adjust_glyphs P_ ((struct frame *)); |
2296 void free_glyphs P_ ((struct frame *)); | |
2297 void free_window_matrices P_ ((struct window *)); | |
2298 void check_glyph_memory P_ ((void)); | |
2299 void mirrored_line_dance P_ ((struct glyph_matrix *, int, int, int *, char *)); | |
2300 void clear_glyph_matrix P_ ((struct glyph_matrix *)); | |
2301 void clear_current_matrices P_ ((struct frame *f)); | |
2302 void clear_desired_matrices P_ ((struct frame *)); | |
2303 void shift_glyph_matrix P_ ((struct window *, struct glyph_matrix *, | |
2304 int, int, int)); | |
2305 void rotate_matrix P_ ((struct glyph_matrix *, int, int, int)); | |
28707
ed910be216eb
Change names of renamed functions from dispnew.c in prototypes.
Gerd Moellmann <gerd@gnu.org>
parents:
28684
diff
changeset
|
2306 void increment_matrix_positions P_ ((struct glyph_matrix *, |
ed910be216eb
Change names of renamed functions from dispnew.c in prototypes.
Gerd Moellmann <gerd@gnu.org>
parents:
28684
diff
changeset
|
2307 int, int, int, int)); |
25012 | 2308 void blank_row P_ ((struct window *, struct glyph_row *, int)); |
28707
ed910be216eb
Change names of renamed functions from dispnew.c in prototypes.
Gerd Moellmann <gerd@gnu.org>
parents:
28684
diff
changeset
|
2309 void increment_row_positions P_ ((struct glyph_row *, int, int)); |
25012 | 2310 void enable_glyph_matrix_rows P_ ((struct glyph_matrix *, int, int, int)); |
2311 void clear_glyph_row P_ ((struct glyph_row *)); | |
2312 void prepare_desired_row P_ ((struct glyph_row *)); | |
2313 int line_hash_code P_ ((struct glyph_row *)); | |
2314 void set_window_update_flags P_ ((struct window *, int)); | |
2315 void write_glyphs P_ ((struct glyph *, int)); | |
2316 void insert_glyphs P_ ((struct glyph *, int)); | |
2317 void redraw_frame P_ ((struct frame *)); | |
2318 void redraw_garbaged_frames P_ ((void)); | |
2319 int scroll_cost P_ ((struct frame *, int, int, int)); | |
2320 int direct_output_for_insert P_ ((int)); | |
2321 int direct_output_forward_char P_ ((int)); | |
2322 int update_frame P_ ((struct frame *, int, int)); | |
2323 void update_single_window P_ ((struct window *, int)); | |
2324 int scrolling P_ ((struct frame *)); | |
36696
ba2a7a0cfb84
(buffer_posn_from_coords): Adjust prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36671
diff
changeset
|
2325 void buffer_posn_from_coords P_ ((struct window *, int *, int *, |
ba2a7a0cfb84
(buffer_posn_from_coords): Adjust prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36671
diff
changeset
|
2326 Lisp_Object *, struct display_pos *)); |
25344
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2327 void do_pending_window_change P_ ((int)); |
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2328 void change_frame_size P_ ((struct frame *, int, int, int, int, int)); |
25012 | 2329 void bitch_at_user P_ ((void)); |
2330 Lisp_Object sit_for P_ ((int, int, int, int, int)); | |
2331 void init_display P_ ((void)); | |
2332 void syms_of_display P_ ((void)); | |
30722
1c138ac4bf6d
(Qredisplay_dont_pause): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
30475
diff
changeset
|
2333 extern Lisp_Object Qredisplay_dont_pause; |
21515 | 2334 |
2335 /* Defined in term.c */ | |
25012 | 2336 |
21515 | 2337 extern void ring_bell P_ ((void)); |
2338 extern void set_terminal_modes P_ ((void)); | |
2339 extern void reset_terminal_modes P_ ((void)); | |
2340 extern void update_begin P_ ((struct frame *)); | |
2341 extern void update_end P_ ((struct frame *)); | |
2342 extern void set_terminal_window P_ ((int)); | |
2343 extern void set_scroll_region P_ ((int, int)); | |
2344 extern void turn_off_insert P_ ((void)); | |
2345 extern void turn_off_highlight P_ ((void)); | |
2346 extern void background_highlight P_ ((void)); | |
2347 extern void reassert_line_highlight P_ ((int, int)); | |
2348 extern void clear_frame P_ ((void)); | |
2349 extern void clear_end_of_line P_ ((int)); | |
2350 extern void clear_end_of_line_raw P_ ((int)); | |
2351 extern void delete_glyphs P_ ((int)); | |
2352 extern void ins_del_lines P_ ((int, int)); | |
2353 extern int string_cost P_ ((char *)); | |
2354 extern int per_line_cost P_ ((char *)); | |
2355 extern void calculate_costs P_ ((struct frame *)); | |
2356 extern void term_init P_ ((char *)); | |
2357 extern void fatal P_ ((/* char *, ... */)); | |
25012 | 2358 void cursor_to P_ ((int, int)); |
2359 void change_line_highlight P_ ((int, int, int, int)); | |
21515 | 2360 |
2361 /* Defined in scroll.c */ | |
25012 | 2362 |
21515 | 2363 extern int scrolling_max_lines_saved P_ ((int, int, int *, int *, int *)); |
2364 extern int scroll_cost P_ ((struct frame *, int, int, int)); | |
2365 extern void do_line_insertion_deletion_costs P_ ((struct frame *, char *, | |
2366 char *, char *, char *, | |
2367 char *, char *, int)); | |
25012 | 2368 void scrolling_1 P_ ((struct frame *, int, int, int, int *, int *, int *, |
2369 int *, int)); | |
2370 | |
2371 #endif /* not DISPEXTERN_H_INCLUDED */ |