Mercurial > emacs
annotate src/dispextern.h @ 51242:661e2fe7e775
(autoconf-mode setups): Recognise AH_ and AU_ entries in "(autoconf)Autoconf
Macro Index". Add "(autoconf)M4 Macro Index" and "(autoconf)Autotest Macro
Index". Remove duplicate copy of "(automake)Macro and Variable Index". Keep
automake after all autoconf possibilities, so as to prefer those.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Sun, 25 May 2003 21:03:57 +0000 |
parents | e7a9fef91d7d |
children | 695cf19ef79e |
rev | line source |
---|---|
247 | 1 /* Interface definitions for display code. |
49834
c3d892afbca5
(in_display_vector_p): Declare.
Andreas Schwab <schwab@suse.de>
parents:
49600
diff
changeset
|
2 Copyright (C) 1985, 1993, 1994, 1997, 1998, 1999, 2000, 2001, 2002, 2003 |
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 | |
47996
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
28 |
1409
7fd1c810daca
* dispextern.h: New element of frame structure `max_ascent'.
Joseph Arceneaux <jla@gnu.org>
parents:
764
diff
changeset
|
29 #include <X11/Xlib.h> |
25881
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
30 #ifdef USE_X_TOOLKIT |
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
31 #include <X11/Intrinsic.h> |
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
32 #endif /* USE_X_TOOLKIT */ |
47996
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
33 |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
34 #else /* !HAVE_X_WINDOWS */ |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
35 |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
36 /* X-related stuff used by non-X gui code. */ |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
37 |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
38 typedef struct { |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
39 unsigned long pixel; |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
40 unsigned short red, green, blue; |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
41 char flags; |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
42 char pad; |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
43 } XColor; |
276c5262e359
[!HAVE_X_WINDOWS]: Define XColor.
Juanma Barranquero <lekktu@gmail.com>
parents:
47135
diff
changeset
|
44 |
25881
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
45 #endif /* HAVE_X_WINDOWS */ |
1409
7fd1c810daca
* dispextern.h: New element of frame structure `max_ascent'.
Joseph Arceneaux <jla@gnu.org>
parents:
764
diff
changeset
|
46 |
9572 | 47 #ifdef MSDOS |
48 #include "msdos.h" | |
49 #endif | |
50 | |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
51 #ifdef HAVE_X_WINDOWS |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
52 typedef struct x_display_info Display_Info; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
53 #define NativeRectangle XRectangle |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
54 #endif |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
55 |
13407
5ebb99bc06bb
[HAVE_NTGUI]: Include win32.h.
Geoff Voelker <voelker@cs.washington.edu>
parents:
9572
diff
changeset
|
56 #ifdef HAVE_NTGUI |
16887
dd6cbc8b53e8
Use new name w32gui.h
Geoff Voelker <voelker@cs.washington.edu>
parents:
16051
diff
changeset
|
57 #include "w32gui.h" |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
58 typedef struct w32_display_info Display_Info; |
13407
5ebb99bc06bb
[HAVE_NTGUI]: Include win32.h.
Geoff Voelker <voelker@cs.washington.edu>
parents:
9572
diff
changeset
|
59 #endif |
5ebb99bc06bb
[HAVE_NTGUI]: Include win32.h.
Geoff Voelker <voelker@cs.washington.edu>
parents:
9572
diff
changeset
|
60 |
50301
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
61 #ifdef HAVE_CARBON |
32752
923b8d6d8277
Initial check-in: changes for building Emacs under Mac OS.
Andrew Choi <akochoi@shaw.ca>
parents:
32543
diff
changeset
|
62 #include "macgui.h" |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
63 typedef struct mac_display_info Display_Info; |
50301
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
64 |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
65 /* Include Carbon.h to define Cursor and Rect. */ |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
66 #undef mktime |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
67 #undef DEBUG |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
68 #undef Z |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
69 #undef free |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
70 #undef malloc |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
71 #undef realloc |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
72 /* Macros max and min defined in lisp.h conflict with those in |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
73 precompiled header Carbon.h. */ |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
74 #undef max |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
75 #undef min |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
76 #undef init_process |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
77 #include <Carbon/Carbon.h> |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
78 #undef Z |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
79 #define Z (current_buffer->text->z) |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
80 #undef free |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
81 #define free unexec_free |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
82 #undef malloc |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
83 #define malloc unexec_malloc |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
84 #undef realloc |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
85 #define realloc unexec_realloc |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
86 #undef min |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
87 #define min(a, b) ((a) < (b) ? (a) : (b)) |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
88 #undef max |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
89 #define max(a, b) ((a) > (b) ? (a) : (b)) |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
90 #undef init_process |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
91 #define init_process emacs_init_process |
c0f3ec529c05
Allow building on Mac OS X again after Kim's merging of display code.
Andrew Choi <akochoi@shaw.ca>
parents:
50249
diff
changeset
|
92 |
25520
e4c237a5a833
[macintosh]: Include macterm.h to define substitute X
Richard M. Stallman <rms@gnu.org>
parents:
25513
diff
changeset
|
93 #endif |
25012 | 94 |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
95 |
50249
ab5177b4137b
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50246
diff
changeset
|
96 #ifndef NativeRectangle |
ab5177b4137b
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50246
diff
changeset
|
97 #define NativeRectangle int |
ab5177b4137b
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50246
diff
changeset
|
98 #endif |
ab5177b4137b
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50246
diff
changeset
|
99 |
ab5177b4137b
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50246
diff
changeset
|
100 |
25012 | 101 /* Structure forward declarations. Some are here because function |
102 prototypes below reference structure types before their definition | |
103 in this file. Some are here because not every file including | |
104 dispextern.h also includes frame.h and windows.h. */ | |
105 | |
106 struct glyph; | |
107 struct glyph_row; | |
108 struct glyph_matrix; | |
109 struct glyph_pool; | |
110 struct frame; | |
111 struct window; | |
112 | |
113 | |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
114 /* Values returned from coordinates_in_window. */ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
115 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
116 enum window_part |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
117 { |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
118 ON_NOTHING, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
119 ON_TEXT, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
120 ON_MODE_LINE, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
121 ON_VERTICAL_BORDER, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
122 ON_HEADER_LINE, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
123 ON_LEFT_FRINGE, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
124 ON_RIGHT_FRINGE, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
125 ON_LEFT_MARGIN, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
126 ON_RIGHT_MARGIN |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
127 }; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
128 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
129 |
25012 | 130 |
131 /*********************************************************************** | |
132 Debugging | |
133 ***********************************************************************/ | |
134 | |
135 /* If GLYPH_DEBUG is non-zero, additional checks are activated. Turn | |
136 it off by defining the macro GLYPH_DEBUG to zero. */ | |
137 | |
138 #ifndef GLYPH_DEBUG | |
139 #define GLYPH_DEBUG 0 | |
140 #endif | |
141 | |
142 /* Macros to include code only if GLYPH_DEBUG != 0. */ | |
143 | |
144 #if GLYPH_DEBUG | |
145 #define IF_DEBUG(X) X | |
25708
a6aabf050a60
Add prototypes for gamma_correct and
Gerd Moellmann <gerd@gnu.org>
parents:
25655
diff
changeset
|
146 #define xassert(X) do {if (!(X)) abort ();} while (0) |
25012 | 147 #else |
148 #define IF_DEBUG(X) (void) 0 | |
149 #define xassert(X) (void) 0 | |
150 #endif | |
151 | |
152 /* Macro for displaying traces of redisplay. If Emacs was compiled | |
153 with GLYPH_DEBUG != 0, the variable trace_redisplay_p can be set to | |
154 a non-zero value in debugging sessions to activate traces. */ | |
155 | |
156 #if GLYPH_DEBUG | |
157 | |
158 extern int trace_redisplay_p; | |
159 #include <stdio.h> | |
160 | |
161 #define TRACE(X) \ | |
162 if (trace_redisplay_p) \ | |
163 fprintf X; \ | |
164 else \ | |
165 (void) 0 | |
166 | |
167 #else /* GLYPH_DEBUG == 0 */ | |
168 | |
169 #define TRACE(X) (void) 0 | |
170 | |
171 #endif /* GLYPH_DEBUG == 0 */ | |
172 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
173 |
25012 | 174 |
175 /*********************************************************************** | |
176 Text positions | |
177 ***********************************************************************/ | |
178 | |
179 /* Starting with Emacs 20.3, characters from strings and buffers have | |
180 both a character and a byte position associated with them. The | |
181 following structure holds such a pair of positions. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
182 |
25012 | 183 struct text_pos |
184 { | |
185 /* Character position. */ | |
186 int charpos; | |
187 | |
188 /* Corresponding byte position. */ | |
189 int bytepos; | |
190 }; | |
191 | |
192 /* Access character and byte position of POS in a functional form. */ | |
193 | |
194 #define BYTEPOS(POS) (POS).bytepos | |
195 #define CHARPOS(POS) (POS).charpos | |
196 | |
197 /* Set character position of POS to CHARPOS, byte position to BYTEPOS. */ | |
198 | |
199 #define SET_TEXT_POS(POS, CHARPOS, BYTEPOS) \ | |
200 ((POS).charpos = (CHARPOS), (POS).bytepos = BYTEPOS) | |
201 | |
202 /* Increment text position POS. */ | |
203 | |
28360
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
204 #define INC_TEXT_POS(POS, MULTIBYTE_P) \ |
25012 | 205 do \ |
206 { \ | |
207 ++(POS).charpos; \ | |
28360
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
208 if (MULTIBYTE_P) \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
209 INC_POS ((POS).bytepos); \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
210 else \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
211 ++(POS).bytepos; \ |
25012 | 212 } \ |
213 while (0) | |
214 | |
215 /* Decrement text position POS. */ | |
216 | |
28360
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
217 #define DEC_TEXT_POS(POS, MULTIBYTE_P) \ |
25012 | 218 do \ |
219 { \ | |
220 --(POS).charpos; \ | |
28360
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
221 if (MULTIBYTE_P) \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
222 DEC_POS ((POS).bytepos); \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
223 else \ |
37743eccd7aa
(INC_TEXT_POS, DEC_TEXT_POS): Add parameter MULTIBYTE_P.
Gerd Moellmann <gerd@gnu.org>
parents:
28254
diff
changeset
|
224 --(POS).bytepos; \ |
25012 | 225 } \ |
226 while (0) | |
227 | |
228 /* Set text position POS from marker MARKER. */ | |
229 | |
230 #define SET_TEXT_POS_FROM_MARKER(POS, MARKER) \ | |
231 (CHARPOS (POS) = marker_position ((MARKER)), \ | |
232 BYTEPOS (POS) = marker_byte_position ((MARKER))) | |
233 | |
234 /* Set marker MARKER from text position POS. */ | |
235 | |
236 #define SET_MARKER_FROM_TEXT_POS(MARKER, POS) \ | |
237 set_marker_both ((MARKER), Qnil, CHARPOS ((POS)), BYTEPOS ((POS))) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
238 |
25012 | 239 /* Value is non-zero if character and byte positions of POS1 and POS2 |
240 are equal. */ | |
241 | |
242 #define TEXT_POS_EQUAL_P(POS1, POS2) \ | |
243 ((POS1).charpos == (POS2).charpos \ | |
244 && (POS1).bytepos == (POS2).bytepos) | |
245 | |
246 /* When rendering glyphs, redisplay scans string or buffer text, | |
247 overlay strings in that text, and does display table or control | |
248 character translations. The following structure captures a | |
249 position taking all this into account. */ | |
250 | |
251 struct display_pos | |
252 { | |
253 /* Buffer or string position. */ | |
254 struct text_pos pos; | |
255 | |
256 /* If this is a position in an overlay string, overlay_string_index | |
257 is the index of that overlay string in the sequence of overlay | |
258 strings at `pos' in the order redisplay processes them. A value | |
259 < 0 means that this is not a position in an overlay string. */ | |
260 int overlay_string_index; | |
261 | |
262 /* If this is a position in an overlay string, string_pos is the | |
263 position within that string. */ | |
264 struct text_pos string_pos; | |
265 | |
266 /* If the character at the position above is a control character or | |
267 has a display table entry, dpvec_index is an index in the display | |
268 table or control character translation of that character. A | |
269 value < 0 means this is not a position in such a translation. */ | |
270 int dpvec_index; | |
271 }; | |
272 | |
273 | |
274 | |
275 /*********************************************************************** | |
276 Glyphs | |
277 ***********************************************************************/ | |
278 | |
279 /* Enumeration of glyph types. Glyph structures contain a type field | |
280 containing one of the enumerators defined here. */ | |
281 | |
282 enum glyph_type | |
283 { | |
284 /* Glyph describes a character. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
285 CHAR_GLYPH, |
25012 | 286 |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
287 /* Glyph describes a composition sequence. */ |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
288 COMPOSITE_GLYPH, |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
289 |
25012 | 290 /* Glyph describes an image. */ |
291 IMAGE_GLYPH, | |
292 | |
293 /* Glyph is a space of fractional width and/or height. */ | |
294 STRETCH_GLYPH | |
295 }; | |
296 | |
297 | |
30040 | 298 /* Glyphs. |
299 | |
300 Be extra careful when changing this structure! Esp. make sure that | |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
301 functions producing glyphs, like append_glyph, fill ALL of the |
30040 | 302 glyph structure, and that GLYPH_EQUAL_P compares all |
303 display-relevant members of glyphs (not to imply that these are the | |
304 only things to check when you add a member). */ | |
25012 | 305 |
306 struct glyph | |
307 { | |
308 /* Position from which this glyph was drawn. If `object' below is a | |
309 Lisp string, this is a position in that string. If it is a | |
310 buffer, this is a position in that buffer. A value of -1 | |
311 together with a null object means glyph is a truncation glyph at | |
312 the start of a row. */ | |
313 int charpos; | |
314 | |
315 /* Lisp object source of this glyph. Currently either a buffer or | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
316 a string, if the glyph was produced from characters which came from |
36799 | 317 a buffer or a string; or 0 if the glyph was inserted by redisplay |
318 for its own purposes such as padding. */ | |
25012 | 319 Lisp_Object object; |
320 | |
321 /* Width in pixels. */ | |
322 short pixel_width; | |
323 | |
324 /* Vertical offset. If < 0, the glyph is displayed raised, if > 0 | |
325 the glyph is displayed lowered. */ | |
326 short voffset; | |
327 | |
328 /* Which kind of glyph this is---character, image etc. Value | |
329 should be an enumerator of type enum glyph_type. */ | |
330 unsigned type : 2; | |
331 | |
332 /* 1 means this glyph was produced from multibyte text. Zero | |
333 means it was produced from unibyte text, i.e. charsets aren't | |
334 applicable, and encoding is not performed. */ | |
335 unsigned multibyte_p : 1; | |
336 | |
337 /* Non-zero means draw a box line at the left or right side of this | |
338 glyph. This is part of the implementation of the face attribute | |
339 `:box'. */ | |
340 unsigned left_box_line_p : 1; | |
341 unsigned right_box_line_p : 1; | |
342 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
343 /* 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
|
344 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
|
345 glyphs above or below it. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
346 unsigned overlaps_vertically_p : 1; |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
347 |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
348 /* 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
|
349 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
|
350 (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
|
351 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
|
352 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
|
353 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
|
354 padding. */ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
355 unsigned padding_p : 1; |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
356 |
36799 | 357 /* 1 means the actual glyph is not available, draw a box instead. |
358 This can happen when a font couldn't be loaded, or a character | |
359 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
|
360 unsigned glyph_not_available_p : 1; |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
361 |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
362 /* Face of the glyph. */ |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
363 unsigned face_id : 21; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
364 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
365 /* Type of font used to display the character glyph. May be used to |
29311
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
366 determine which set of functions to use to obtain font metrics |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
367 for the glyph. On W32, value should be an enumerator of the type |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
368 w32_char_font_type. Otherwise it equals FONT_TYPE_UNKNOWN. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
369 unsigned font_type : 3; |
29311
ae557edf565b
(struct glyph) [WINDOWSNT]: Add w32_font_type member.
Jason Rumney <jasonr@gnu.org>
parents:
28985
diff
changeset
|
370 |
25012 | 371 /* A union of sub-structures for different glyph types. */ |
372 union | |
1409
7fd1c810daca
* dispextern.h: New element of frame structure `max_ascent'.
Joseph Arceneaux <jla@gnu.org>
parents:
764
diff
changeset
|
373 { |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
374 /* 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
|
375 unsigned ch; |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
376 |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
377 /* 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
|
378 unsigned cmp_id; |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
379 |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
380 /* 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
|
381 unsigned img_id; |
25012 | 382 |
383 /* Sub-structure for type == STRETCH_GLYPH. */ | |
384 struct | |
385 { | |
386 /* 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
|
387 unsigned height : 16; |
25012 | 388 |
389 /* 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
|
390 unsigned ascent : 16; |
25012 | 391 } |
392 stretch; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
393 |
25012 | 394 /* Used to compare all bit-fields above in one step. */ |
395 unsigned val; | |
396 } u; | |
397 }; | |
398 | |
399 | |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
400 /* Default value of the glyph font_type field. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
401 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
402 #define FONT_TYPE_UNKNOWN 0 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
403 |
25012 | 404 /* Is GLYPH a space? */ |
405 | |
406 #define CHAR_GLYPH_SPACE_P(GLYPH) \ | |
407 (GLYPH_FROM_CHAR_GLYPH ((GLYPH)) == SPACEGLYPH) | |
408 | |
30040 | 409 /* Are glyphs *X and *Y displayed equal? */ |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
410 |
25012 | 411 #define GLYPH_EQUAL_P(X, Y) \ |
412 ((X)->type == (Y)->type \ | |
413 && (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
|
414 && (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
|
415 && (X)->padding_p == (Y)->padding_p \ |
25012 | 416 && (X)->left_box_line_p == (Y)->left_box_line_p \ |
417 && (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
|
418 && (X)->voffset == (Y)->voffset \ |
075528550112
(GLYPH_EQUAL_P): Also compare pixel widths,
Gerd Moellmann <gerd@gnu.org>
parents:
34787
diff
changeset
|
419 && (X)->pixel_width == (Y)->pixel_width) |
25012 | 420 |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
421 /* 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
|
422 |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
423 #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
|
424 ((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
|
425 && (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
|
426 && (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
|
427 |
25012 | 428 /* Fill a character glyph GLYPH. CODE, FACE_ID, PADDING_P correspond |
429 to the bits defined for the typedef `GLYPH' in lisp.h. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
430 |
25012 | 431 #define SET_CHAR_GLYPH(GLYPH, CODE, FACE_ID, PADDING_P) \ |
432 do \ | |
433 { \ | |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
434 (GLYPH).u.ch = (CODE); \ |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
435 (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
|
436 (GLYPH).padding_p = (PADDING_P); \ |
25012 | 437 } \ |
438 while (0) | |
439 | |
440 /* Fill a character type glyph GLYPH from a glyph typedef FROM as | |
441 defined in lisp.h. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
442 |
25012 | 443 #define SET_CHAR_GLYPH_FROM_GLYPH(GLYPH, FROM) \ |
444 SET_CHAR_GLYPH ((GLYPH), \ | |
445 FAST_GLYPH_CHAR ((FROM)), \ | |
446 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
|
447 0) |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
448 |
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
449 /* 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
|
450 character is multibyte, return -1 as we can't use glyph table for a |
42753 | 451 multibyte character. */ |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
452 |
30475
fe219c6d2ba2
(GLYPH_FROM_CHAR_GLYPH): Use CHARACTERBITS bits
Gerd Moellmann <gerd@gnu.org>
parents:
30343
diff
changeset
|
453 #define GLYPH_FROM_CHAR_GLYPH(GLYPH) \ |
fe219c6d2ba2
(GLYPH_FROM_CHAR_GLYPH): Use CHARACTERBITS bits
Gerd Moellmann <gerd@gnu.org>
parents:
30343
diff
changeset
|
454 ((GLYPH).u.ch < 256 \ |
fe219c6d2ba2
(GLYPH_FROM_CHAR_GLYPH): Use CHARACTERBITS bits
Gerd Moellmann <gerd@gnu.org>
parents:
30343
diff
changeset
|
455 ? ((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
|
456 : -1) |
25012 | 457 |
458 /* Is GLYPH a padding glyph? */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
459 |
26997
de70d8b0de3b
(struct glyph): Make face_id and padding_p the top
Kenichi Handa <handa@m17n.org>
parents:
26902
diff
changeset
|
460 #define CHAR_GLYPH_PADDING_P(GLYPH) (GLYPH).padding_p |
25012 | 461 |
462 | |
463 | |
464 | |
465 /*********************************************************************** | |
466 Glyph Pools | |
467 ***********************************************************************/ | |
468 | |
469 /* Glyph Pool. | |
470 | |
471 Glyph memory for frame-based redisplay is allocated from the heap | |
472 in one vector kept in a glyph pool structure which is stored with | |
473 the frame. The size of the vector is made large enough to cover | |
474 all windows on the frame. | |
475 | |
476 Both frame and window glyph matrices reference memory from a glyph | |
477 pool in frame-based redisplay. | |
478 | |
479 In window-based redisplay, no glyphs pools exist; windows allocate | |
480 and free their glyph memory themselves. */ | |
481 | |
482 struct glyph_pool | |
483 { | |
484 /* Vector of glyphs allocated from the heap. */ | |
485 struct glyph *glyphs; | |
486 | |
487 /* Allocated size of `glyphs'. */ | |
488 int nglyphs; | |
489 | |
490 /* Number of rows and columns in a matrix. */ | |
491 int nrows, ncolumns; | |
492 }; | |
493 | |
494 | |
495 | |
496 /*********************************************************************** | |
497 Glyph Matrix | |
498 ***********************************************************************/ | |
499 | |
500 /* Glyph Matrix. | |
501 | |
502 Three kinds of glyph matrices exist: | |
503 | |
504 1. Frame glyph matrices. These are used for terminal frames whose | |
505 redisplay needs a view of the whole screen due to limited terminal | |
506 capabilities. Frame matrices are used only in the update phase | |
507 of redisplay. They are built in update_frame and not used after | |
508 the update has been performed. | |
509 | |
510 2. Window glyph matrices on frames having frame glyph matrices. | |
511 Such matrices are sub-matrices of their corresponding frame matrix, | |
512 i.e. frame glyph matrices and window glyph matrices share the same | |
513 glyph memory which is allocated in form of a glyph_pool structure. | |
514 Glyph rows in such a window matrix are slices of frame matrix rows. | |
515 | |
516 2. Free-standing window glyph matrices managing their own glyph | |
517 storage. This form is used in window-based redisplay which | |
518 includes variable width and height fonts etc. | |
519 | |
520 The size of a window's row vector depends on the height of fonts | |
521 defined on its frame. It is chosen so that the vector is large | |
522 enough to describe all lines in a window when it is displayed in | |
523 the smallest possible character size. When new fonts are loaded, | |
524 or window sizes change, the row vector is adjusted accordingly. */ | |
525 | |
526 struct glyph_matrix | |
527 { | |
528 /* The pool from which glyph memory is allocated, if any. This is | |
529 null for frame matrices and for window matrices managing their | |
530 own storage. */ | |
531 struct glyph_pool *pool; | |
532 | |
533 /* Vector of glyph row structures. The row at nrows - 1 is reserved | |
534 for the mode line. */ | |
535 struct glyph_row *rows; | |
536 | |
537 /* Number of elements allocated for the vector rows above. */ | |
538 int rows_allocated; | |
539 | |
540 /* The number of rows used by the window if all lines were displayed | |
541 with the smallest possible character height. */ | |
542 int nrows; | |
543 | |
544 /* Origin within the frame matrix if this is a window matrix on a | |
545 frame having a frame matrix. Both values are zero for | |
546 window-based redisplay. */ | |
547 int matrix_x, matrix_y; | |
548 | |
549 /* Width and height of the matrix in columns and rows. */ | |
550 int matrix_w, matrix_h; | |
551 | |
34280
4a7a6cfe861d
(struct glyph_matrix): Add member window_left_x.
Gerd Moellmann <gerd@gnu.org>
parents:
34226
diff
changeset
|
552 /* If this structure describes a window matrix of window W, |
51192
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
553 window_left_col is the value of W->left_col, window_top_line the |
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
554 value of W->top_line, window_height and window_width are width and |
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
555 height of W, as returned by window_box, and window_vscroll is the |
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
556 value of W->vscroll at the time the matrix was last adjusted. |
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
557 Only set for window-based redisplay. */ |
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
558 int window_left_col, window_top_line; |
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
559 int window_height, window_width; |
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
560 int window_vscroll; |
25012 | 561 |
562 /* Number of glyphs reserved for left and right marginal areas when | |
563 the matrix was last adjusted. */ | |
564 int left_margin_glyphs, right_margin_glyphs; | |
565 | |
566 /* Flag indicating that scrolling should not be tried in | |
567 update_window. This flag is set by functions like try_window_id | |
568 which do their own scrolling. */ | |
569 unsigned no_scrolling_p : 1; | |
570 | |
571 /* Non-zero means window displayed in this matrix has a top mode | |
572 line. */ | |
25546 | 573 unsigned header_line_p : 1; |
25012 | 574 |
575 #ifdef GLYPH_DEBUG | |
576 /* A string identifying the method used to display the matrix. */ | |
577 char method[512]; | |
578 #endif | |
25371
f13b05bf590b
(struct glyph_matrix): Add buffer, begv, and zv.
Gerd Moellmann <gerd@gnu.org>
parents:
25344
diff
changeset
|
579 |
37628 | 580 /* The buffer this matrix displays. Set in |
581 mark_window_display_accurate_1. */ | |
25371
f13b05bf590b
(struct glyph_matrix): Add buffer, begv, and zv.
Gerd Moellmann <gerd@gnu.org>
parents:
25344
diff
changeset
|
582 struct buffer *buffer; |
f13b05bf590b
(struct glyph_matrix): Add buffer, begv, and zv.
Gerd Moellmann <gerd@gnu.org>
parents:
25344
diff
changeset
|
583 |
37628 | 584 /* Values of BEGV and ZV as of last redisplay. Set in |
585 mark_window_display_accurate_1. */ | |
25371
f13b05bf590b
(struct glyph_matrix): Add buffer, begv, and zv.
Gerd Moellmann <gerd@gnu.org>
parents:
25344
diff
changeset
|
586 int begv, zv; |
25012 | 587 }; |
588 | |
589 | |
590 /* Check that glyph pointers stored in glyph rows of MATRIX are okay. | |
591 This aborts if any pointer is found twice. */ | |
592 | |
593 #if GLYPH_DEBUG | |
594 void check_matrix_pointer_lossage P_ ((struct glyph_matrix *)); | |
595 #define CHECK_MATRIX(MATRIX) check_matrix_pointer_lossage ((MATRIX)) | |
596 #else | |
597 #define CHECK_MATRIX(MATRIX) (void) 0 | |
598 #endif | |
599 | |
600 | |
601 | |
602 /*********************************************************************** | |
603 Glyph Rows | |
604 ***********************************************************************/ | |
605 | |
606 /* Area in window glyph matrix. If values are added or removed, the | |
607 function mark_object in alloc.c has to be changed. */ | |
608 | |
609 enum glyph_row_area | |
610 { | |
611 LEFT_MARGIN_AREA, | |
612 TEXT_AREA, | |
613 RIGHT_MARGIN_AREA, | |
614 LAST_AREA | |
615 }; | |
616 | |
617 | |
618 /* Rows of glyphs in a windows or frame glyph matrix. | |
619 | |
620 Each row is partitioned into three areas. The start and end of | |
621 each area is recorded in a pointer as shown below. | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
622 |
25012 | 623 +--------------------+-------------+---------------------+ |
624 | left margin area | text area | right margin area | | |
625 +--------------------+-------------+---------------------+ | |
626 | | | | | |
627 glyphs[LEFT_MARGIN_AREA] glyphs[RIGHT_MARGIN_AREA] | |
628 | | | |
629 glyphs[TEXT_AREA] | | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
630 glyphs[LAST_AREA] |
25012 | 631 |
632 Rows in frame matrices reference glyph memory allocated in a frame | |
633 glyph pool (see the description of struct glyph_pool). Rows in | |
634 window matrices on frames having frame matrices reference slices of | |
635 the glyphs of corresponding rows in the frame matrix. | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
636 |
25012 | 637 Rows in window matrices on frames having no frame matrices point to |
638 glyphs allocated from the heap via xmalloc; | |
639 glyphs[LEFT_MARGIN_AREA] is the start address of the allocated | |
640 glyph structure array. */ | |
641 | |
642 struct glyph_row | |
643 { | |
644 /* Pointers to beginnings of areas. The end of an area A is found at | |
645 A + 1 in the vector. The last element of the vector is the end | |
646 of the whole row. | |
647 | |
648 Kludge alert: Even if used[TEXT_AREA] == 0, glyphs[TEXT_AREA][0]'s | |
649 position field is used. It is -1 if this row does not correspond | |
650 to any text; it is some buffer position if the row corresponds to | |
651 an empty display line that displays a line end. This is what old | |
652 redisplay used to do. (Except in code for terminal frames, this | |
42753 | 653 kludge is no longer used, I believe. --gerd). |
25012 | 654 |
655 See also start, end, displays_text_p and ends_at_zv_p for cleaner | |
656 ways to do it. The special meaning of positions 0 and -1 will be | |
657 removed some day, so don't use it in new code. */ | |
658 struct glyph *glyphs[1 + LAST_AREA]; | |
659 | |
660 /* Number of glyphs actually filled in areas. */ | |
661 short used[LAST_AREA]; | |
662 | |
663 /* Window-relative x and y-position of the top-left corner of this | |
664 row. If y < 0, this means that abs (y) pixels of the row are | |
665 invisible because it is partially visible at the top of a window. | |
666 If x < 0, this means that abs (x) pixels of the first glyph of | |
667 the text area of the row are invisible because the glyph is | |
668 partially visible. */ | |
669 int x, y; | |
670 | |
671 /* Width of the row in pixels without taking face extension at the | |
38266 | 672 end of the row into account, and without counting truncation |
673 and continuation glyphs at the end of a row on ttys. */ | |
25012 | 674 int pixel_width; |
675 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
676 /* 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
|
677 and height is 1 on terminal frames. */ |
25012 | 678 int ascent, height; |
679 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
680 /* 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
|
681 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
|
682 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
|
683 int phys_ascent, phys_height; |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
684 |
25012 | 685 /* Portion of row that is visible. Partially visible rows may be |
686 found at the top and bottom of a window. This is 1 for tty | |
687 frames. It may be < 0 in case of completely invisible rows. */ | |
688 int visible_height; | |
689 | |
690 /* Hash code. This hash code is available as soon as the row | |
691 is constructed, i.e. after a call to display_line. */ | |
692 unsigned hash; | |
693 | |
694 /* First position in this row. This is the text position, including | |
695 overlay position information etc, where the display of this row | |
696 started, and can thus be less the position of the first glyph | |
697 (e.g. due to invisible text or horizontal scrolling). */ | |
698 struct display_pos start; | |
699 | |
700 /* Text position at the end of this row. This is the position after | |
701 the last glyph on this row. It can be greater than the last | |
702 glyph position + 1, due to truncation, invisible text etc. In an | |
703 up-to-date display, this should always be equal to the start | |
704 position of the next row. */ | |
705 struct display_pos end; | |
706 | |
707 /* In a desired matrix, 1 means that this row must be updated. In a | |
708 current matrix, 0 means that the row has been invalidated, i.e. | |
709 the row's contents do not agree with what is visible on the | |
710 screen. */ | |
711 unsigned enabled_p : 1; | |
712 | |
713 /* 1 means row displays a text line that is truncated on the left or | |
714 right side. */ | |
715 unsigned truncated_on_left_p : 1; | |
716 unsigned truncated_on_right_p : 1; | |
717 | |
718 /* 1 means the overlay arrow is on this line. */ | |
719 unsigned overlay_arrow_p : 1; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
720 |
25012 | 721 /* 1 means that this row displays a continued line, i.e. it has a |
722 continuation mark at the right side. */ | |
723 unsigned continued_p : 1; | |
724 | |
725 /* 0 means that this row does not contain any text, i.e. it is | |
726 a blank line at the window and buffer end. */ | |
727 unsigned displays_text_p : 1; | |
728 | |
729 /* 1 means that this line ends at ZV. */ | |
730 unsigned ends_at_zv_p : 1; | |
731 | |
732 /* 1 means the face of the last glyph in the text area is drawn to | |
733 the right end of the window. This flag is used in | |
734 update_text_area to optimize clearing to the end of the area. */ | |
735 unsigned fill_line_p : 1; | |
736 | |
737 /* Non-zero means display a bitmap on X frames indicating that this | |
738 line contains no text and ends in ZV. */ | |
739 unsigned indicate_empty_line_p : 1; | |
740 | |
741 /* 1 means this row contains glyphs that overlap each other because | |
742 of lbearing or rbearing. */ | |
743 unsigned contains_overlapping_glyphs_p : 1; | |
744 | |
42753 | 745 /* 1 means this row is as wide as the window it is displayed in, including |
41119 | 746 scroll bars, fringes, and internal borders. This also |
25012 | 747 implies that the row doesn't have marginal areas. */ |
748 unsigned full_width_p : 1; | |
749 | |
42753 | 750 /* Non-zero means row is a mode or header-line. */ |
25012 | 751 unsigned mode_line_p : 1; |
752 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
753 /* 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
|
754 unsigned overlapped_p : 1; |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
755 |
29474
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
756 /* 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
|
757 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
|
758 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
|
759 unsigned ends_in_middle_of_char_p : 1; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
760 |
29474
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
761 /* 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
|
762 of more than one glyph. Some glyphs have been put in the |
42753 | 763 previous row, the rest are put in this row. */ |
29474
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
764 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
|
765 |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
766 /* 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
|
767 unsigned overlapping_p : 1; |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
768 |
30151
de813a66787a
(struct glyph_row): Add flag mouse_face_p.
Gerd Moellmann <gerd@gnu.org>
parents:
30040
diff
changeset
|
769 /* 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
|
770 unsigned mouse_face_p : 1; |
de813a66787a
(struct glyph_row): Add flag mouse_face_p.
Gerd Moellmann <gerd@gnu.org>
parents:
30040
diff
changeset
|
771 |
39521
477edfe737e3
(struct glyph_row) <ends_in_newline_from_string_p>:
Gerd Moellmann <gerd@gnu.org>
parents:
39447
diff
changeset
|
772 /* 1 means this row was ended by a newline from a string. */ |
477edfe737e3
(struct glyph_row) <ends_in_newline_from_string_p>:
Gerd Moellmann <gerd@gnu.org>
parents:
39447
diff
changeset
|
773 unsigned ends_in_newline_from_string_p : 1; |
477edfe737e3
(struct glyph_row) <ends_in_newline_from_string_p>:
Gerd Moellmann <gerd@gnu.org>
parents:
39447
diff
changeset
|
774 |
25012 | 775 /* Continuation lines width at the start of the row. */ |
776 int continuation_lines_width; | |
777 }; | |
778 | |
779 | |
780 /* Get a pointer to row number ROW in matrix MATRIX. If GLYPH_DEBUG | |
781 is defined to a non-zero value, the function matrix_row checks that | |
782 we don't try to access rows that are out of bounds. */ | |
783 | |
784 #if GLYPH_DEBUG | |
785 struct glyph_row *matrix_row P_ ((struct glyph_matrix *, int)); | |
786 #define MATRIX_ROW(MATRIX, ROW) matrix_row ((MATRIX), (ROW)) | |
787 #else | |
788 #define MATRIX_ROW(MATRIX, ROW) ((MATRIX)->rows + (ROW)) | |
789 #endif | |
790 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
791 /* Return a pointer to the row reserved for the mode line in MATRIX. |
25012 | 792 Row MATRIX->nrows - 1 is always reserved for the mode line. */ |
793 | |
794 #define MATRIX_MODE_LINE_ROW(MATRIX) \ | |
795 ((MATRIX)->rows + (MATRIX)->nrows - 1) | |
796 | |
42753 | 797 /* Return a pointer to the row reserved for the header line in MATRIX. |
25012 | 798 This is always the first row in MATRIX because that's the only |
799 way that works in frame-based redisplay. */ | |
800 | |
25546 | 801 #define MATRIX_HEADER_LINE_ROW(MATRIX) (MATRIX)->rows |
25012 | 802 |
803 /* Return a pointer to first row in MATRIX used for text display. */ | |
804 | |
805 #define MATRIX_FIRST_TEXT_ROW(MATRIX) \ | |
806 ((MATRIX)->rows->mode_line_p ? (MATRIX)->rows + 1 : (MATRIX)->rows) | |
807 | |
808 /* Return a pointer to the first glyph in the text area of a row. | |
809 MATRIX is the glyph matrix accessed, and ROW is the row index in | |
810 MATRIX. */ | |
811 | |
812 #define MATRIX_ROW_GLYPH_START(MATRIX, ROW) \ | |
813 (MATRIX_ROW ((MATRIX), (ROW))->glyphs[TEXT_AREA]) | |
814 | |
815 /* Return the number of used glyphs in the text area of a row. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
816 |
25012 | 817 #define MATRIX_ROW_USED(MATRIX, ROW) \ |
818 (MATRIX_ROW ((MATRIX), (ROW))->used[TEXT_AREA]) | |
819 | |
820 /* Return the character/ byte position at which the display of ROW | |
821 starts. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
822 |
25012 | 823 #define MATRIX_ROW_START_CHARPOS(ROW) ((ROW)->start.pos.charpos) |
824 #define MATRIX_ROW_START_BYTEPOS(ROW) ((ROW)->start.pos.bytepos) | |
825 | |
42753 | 826 /* Return the character/ byte position at which ROW ends. */ |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
827 |
25012 | 828 #define MATRIX_ROW_END_CHARPOS(ROW) ((ROW)->end.pos.charpos) |
829 #define MATRIX_ROW_END_BYTEPOS(ROW) ((ROW)->end.pos.bytepos) | |
830 | |
831 /* Return the vertical position of ROW in MATRIX. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
832 |
25012 | 833 #define MATRIX_ROW_VPOS(ROW, MATRIX) ((ROW) - (MATRIX)->rows) |
834 | |
835 /* Return the last glyph row + 1 in MATRIX on window W reserved for | |
836 text. If W has a mode line, the last row in the matrix is reserved | |
837 for it. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
838 |
25012 | 839 #define MATRIX_BOTTOM_TEXT_ROW(MATRIX, W) \ |
840 ((MATRIX)->rows \ | |
841 + (MATRIX)->nrows \ | |
842 - (WINDOW_WANTS_MODELINE_P ((W)) ? 1 : 0)) | |
843 | |
844 /* Non-zero if the face of the last glyph in ROW's text area has | |
845 to be drawn to the end of the text area. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
846 |
25012 | 847 #define MATRIX_ROW_EXTENDS_FACE_P(ROW) ((ROW)->fill_line_p) |
848 | |
849 /* Set and query the enabled_p flag of glyph row ROW in MATRIX. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
850 |
25012 | 851 #define SET_MATRIX_ROW_ENABLED_P(MATRIX, ROW, VALUE) \ |
852 (MATRIX_ROW ((MATRIX), (ROW))->enabled_p = (VALUE) != 0) | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
853 |
25012 | 854 #define MATRIX_ROW_ENABLED_P(MATRIX, ROW) \ |
855 (MATRIX_ROW ((MATRIX), (ROW))->enabled_p) | |
856 | |
857 /* Non-zero if ROW displays text. Value is non-zero if the row is | |
858 blank but displays a line end. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
859 |
25012 | 860 #define MATRIX_ROW_DISPLAYS_TEXT_P(ROW) ((ROW)->displays_text_p) |
861 | |
862 /* Non-zero if ROW is not completely visible in window W. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
863 |
25012 | 864 #define MATRIX_ROW_PARTIALLY_VISIBLE_P(ROW) \ |
865 ((ROW)->height != (ROW)->visible_height) | |
866 | |
867 /* Non-zero if ROW is partially visible at the top of window W. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
868 |
25012 | 869 #define MATRIX_ROW_PARTIALLY_VISIBLE_AT_TOP_P(W, ROW) \ |
870 (MATRIX_ROW_PARTIALLY_VISIBLE_P ((ROW)) \ | |
51192
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
871 && (ROW)->y < WINDOW_HEADER_LINE_HEIGHT ((W))) |
25012 | 872 |
873 /* Non-zero if ROW is partially visible at the bottom of window W. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
874 |
25012 | 875 #define MATRIX_ROW_PARTIALLY_VISIBLE_AT_BOTTOM_P(W, ROW) \ |
876 (MATRIX_ROW_PARTIALLY_VISIBLE_P ((ROW)) \ | |
51192
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
877 && (ROW)->y + (ROW)->height > WINDOW_BOX_HEIGHT_NO_MODE_LINE ((W))) |
25012 | 878 |
879 /* Return the bottom Y + 1 of ROW. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
880 |
25012 | 881 #define MATRIX_ROW_BOTTOM_Y(ROW) ((ROW)->y + (ROW)->height) |
882 | |
883 /* Is ROW the last visible one in the display described by the | |
884 iterator structure pointed to by IT?. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
885 |
25012 | 886 #define MATRIX_ROW_LAST_VISIBLE_P(ROW, IT) \ |
887 (MATRIX_ROW_BOTTOM_Y ((ROW)) >= (IT)->last_visible_y) | |
888 | |
889 /* Non-zero if ROW displays a continuation line. */ | |
890 | |
891 #define MATRIX_ROW_CONTINUATION_LINE_P(ROW) \ | |
892 ((ROW)->continuation_lines_width > 0) | |
893 | |
894 /* Non-zero if ROW ends in the middle of a character. This is the | |
895 case for continued lines showing only part of a display table entry | |
896 or a control char, or an overlay string. */ | |
897 | |
898 #define MATRIX_ROW_ENDS_IN_MIDDLE_OF_CHAR_P(ROW) \ | |
899 ((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
|
900 || (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
|
901 || (ROW)->ends_in_middle_of_char_p) |
25012 | 902 |
903 /* Non-zero if ROW ends in the middle of an overlay string. */ | |
904 | |
905 #define MATRIX_ROW_ENDS_IN_OVERLAY_STRING_P(ROW) \ | |
906 ((ROW)->end.overlay_string_index >= 0) | |
907 | |
908 /* Non-zero if ROW starts in the middle of a character. See above. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
909 |
25012 | 910 #define MATRIX_ROW_STARTS_IN_MIDDLE_OF_CHAR_P(ROW) \ |
911 ((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
|
912 || (ROW)->starts_in_middle_of_char_p \ |
25012 | 913 || ((ROW)->start.overlay_string_index >= 0 \ |
914 && (ROW)->start.string_pos.charpos > 0)) | |
915 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
916 /* Non-zero means ROW overlaps its predecessor. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
917 |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
918 #define MATRIX_ROW_OVERLAPS_PRED_P(ROW) \ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
919 ((ROW)->phys_ascent > (ROW)->ascent) |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
920 |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
921 /* Non-zero means ROW overlaps its successor. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
922 |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
923 #define MATRIX_ROW_OVERLAPS_SUCC_P(ROW) \ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
924 ((ROW)->phys_height - (ROW)->phys_ascent \ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
925 > (ROW)->height - (ROW)->ascent) |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
926 |
25012 | 927 /* Non-zero means that fonts have been loaded since the last glyph |
928 matrix adjustments. The function redisplay_internal adjusts glyph | |
929 matrices when this flag is non-zero. */ | |
930 | |
931 extern int fonts_changed_p; | |
932 | |
933 /* A glyph for a space. */ | |
934 | |
935 extern struct glyph space_glyph; | |
936 | |
32000
41462e513231
(updating_frame): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31875
diff
changeset
|
937 /* Frame being updated by update_window/update_frame. */ |
41462e513231
(updating_frame): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31875
diff
changeset
|
938 |
41462e513231
(updating_frame): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31875
diff
changeset
|
939 extern struct frame *updating_frame; |
41462e513231
(updating_frame): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
31875
diff
changeset
|
940 |
25012 | 941 /* Window being updated by update_window. This is non-null as long as |
942 update_window has not finished, and null otherwise. It's role is | |
943 analogous to updating_frame. */ | |
944 | |
945 extern struct window *updated_window; | |
946 | |
947 /* Glyph row and area updated by update_window_line. */ | |
948 | |
949 extern struct glyph_row *updated_row; | |
950 extern int updated_area; | |
951 | |
952 /* Non-zero means reading single-character input with prompt so put | |
953 cursor on mini-buffer after the prompt. Positive means at end of | |
954 text in echo area; negative means at beginning of line. */ | |
955 | |
956 extern int cursor_in_echo_area; | |
957 | |
958 /* Non-zero means last display completed. Zero means it was | |
959 preempted. */ | |
960 | |
961 extern int display_completed; | |
962 | |
963 /* Non-zero means redisplay has been performed directly (see also | |
964 direct_output_for_insert and direct_output_forward_char), so that | |
965 no further updating has to be performed. The function | |
966 redisplay_internal checks this flag, and does nothing but reset it | |
967 to zero if it is non-zero. */ | |
968 | |
969 extern int redisplay_performed_directly_p; | |
970 | |
971 /* A temporary storage area, including a row of glyphs. Initialized | |
972 in xdisp.c. Used for various purposes, as an example see | |
973 direct_output_for_insert. */ | |
974 | |
975 extern struct glyph_row scratch_glyph_row; | |
976 | |
977 | |
978 | |
979 /************************************************************************ | |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
980 Glyph Strings |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
981 ************************************************************************/ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
982 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
983 /* Enumeration for overriding/changing the face to use for drawing |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
984 glyphs in draw_glyphs. */ |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
985 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
986 enum draw_glyphs_face |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
987 { |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
988 DRAW_NORMAL_TEXT, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
989 DRAW_INVERSE_VIDEO, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
990 DRAW_CURSOR, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
991 DRAW_MOUSE_FACE, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
992 DRAW_IMAGE_RAISED, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
993 DRAW_IMAGE_SUNKEN |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
994 }; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
995 |
50193
dadd724b7ce9
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50149
diff
changeset
|
996 #ifdef HAVE_WINDOW_SYSTEM |
dadd724b7ce9
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50149
diff
changeset
|
997 |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
998 /* A sequence of glyphs to be drawn in the same face. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
999 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1000 struct glyph_string |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1001 { |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1002 /* X-origin of the string. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1003 int x; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1004 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1005 /* Y-origin and y-position of the base line of this string. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1006 int y, ybase; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1007 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1008 /* The width of the string, not including a face extension. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1009 int width; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1010 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1011 /* The width of the string, including a face extension. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1012 int background_width; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1013 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1014 /* The height of this string. This is the height of the line this |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1015 string is drawn in, and can be different from the height of the |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1016 font the string is drawn in. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1017 int height; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1018 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1019 /* Number of pixels this string overwrites in front of its x-origin. |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1020 This number is zero if the string has an lbearing >= 0; it is |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1021 -lbearing, if the string has an lbearing < 0. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1022 int left_overhang; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1023 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1024 /* Number of pixels this string overwrites past its right-most |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1025 nominal x-position, i.e. x + width. Zero if the string's |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1026 rbearing is <= its nominal width, rbearing - width otherwise. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1027 int right_overhang; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1028 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1029 /* The frame on which the glyph string is drawn. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1030 struct frame *f; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1031 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1032 /* The window on which the glyph string is drawn. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1033 struct window *w; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1034 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1035 /* X display and window for convenience. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1036 Display *display; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1037 Window window; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1038 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1039 /* The glyph row for which this string was built. It determines the |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1040 y-origin and height of the string. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1041 struct glyph_row *row; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1042 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1043 /* The area within row. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1044 enum glyph_row_area area; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1045 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1046 /* Characters to be drawn, and number of characters. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1047 XChar2b *char2b; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1048 int nchars; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1049 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1050 /* A face-override for drawing cursors, mouse face and similar. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1051 enum draw_glyphs_face hl; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1052 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1053 /* Face in which this string is to be drawn. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1054 struct face *face; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1055 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1056 /* Font in which this string is to be drawn. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1057 XFontStruct *font; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1058 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1059 /* Font info for this string. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1060 struct font_info *font_info; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1061 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1062 /* Non-null means this string describes (part of) a composition. |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1063 All characters from char2b are drawn composed. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1064 struct composition *cmp; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1065 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1066 /* Index of this glyph string's first character in the glyph |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1067 definition of CMP. If this is zero, this glyph string describes |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1068 the first character of a composition. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1069 int gidx; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1070 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1071 /* 1 means this glyph strings face has to be drawn to the right end |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1072 of the window's drawing area. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1073 unsigned extends_to_end_of_line_p : 1; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1074 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1075 /* 1 means the background of this string has been drawn. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1076 unsigned background_filled_p : 1; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1077 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1078 /* 1 means glyph string must be drawn with 16-bit functions. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1079 unsigned two_byte_p : 1; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1080 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1081 /* 1 means that the original font determined for drawing this glyph |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1082 string could not be loaded. The member `font' has been set to |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1083 the frame's default font in this case. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1084 unsigned font_not_found_p : 1; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1085 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1086 /* 1 means that the face in which this glyph string is drawn has a |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1087 stipple pattern. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1088 unsigned stippled_p : 1; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1089 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1090 /* 1 means only the foreground of this glyph string must be drawn, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1091 and we should use the physical height of the line this glyph |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1092 string appears in as clip rect. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1093 unsigned for_overlaps_p : 1; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1094 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1095 /* The GC to use for drawing this glyph string. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1096 #if defined(HAVE_X_WINDOWS) || defined(HAVE_CARBON) |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1097 GC gc; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1098 #endif |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1099 #if defined(HAVE_NTGUI) |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1100 XGCValues *gc; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1101 HDC hdc; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1102 #endif |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1103 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1104 /* A pointer to the first glyph in the string. This glyph |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1105 corresponds to char2b[0]. Needed to draw rectangles if |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1106 font_not_found_p is 1. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1107 struct glyph *first_glyph; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1108 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1109 /* Image, if any. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1110 struct image *img; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1111 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1112 struct glyph_string *next, *prev; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1113 }; |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1114 |
50193
dadd724b7ce9
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50149
diff
changeset
|
1115 #endif /* HAVE_WINDOW_SYSTEM */ |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1116 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1117 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1118 /************************************************************************ |
25012 | 1119 Display Dimensions |
1120 ************************************************************************/ | |
1121 | |
1122 /* Return the height of the mode line in glyph matrix MATRIX, or zero | |
1123 if not known. This macro is called under circumstances where | |
1124 MATRIX might not have been allocated yet. */ | |
1125 | |
1126 #define MATRIX_MODE_LINE_HEIGHT(MATRIX) \ | |
1127 ((MATRIX) && (MATRIX)->rows \ | |
1128 ? MATRIX_MODE_LINE_ROW (MATRIX)->height \ | |
1129 : 0) | |
1130 | |
42753 | 1131 /* Return the height of the header line in glyph matrix MATRIX, or zero |
25012 | 1132 if not known. This macro is called under circumstances where |
1133 MATRIX might not have been allocated yet. */ | |
1134 | |
25546 | 1135 #define MATRIX_HEADER_LINE_HEIGHT(MATRIX) \ |
25012 | 1136 ((MATRIX) && (MATRIX)->rows \ |
25546 | 1137 ? MATRIX_HEADER_LINE_ROW (MATRIX)->height \ |
25012 | 1138 : 0) |
1139 | |
43242
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1140 /* Return the desired face id for the mode line of a window, depending |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1141 on whether the window is selected or not, or if the window is the |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1142 scrolling window for the currently active minibuffer window. |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1143 |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1144 Due to the way display_mode_lines manipulates with the contents of |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1145 selected_window, this macro needs three arguments: SELW which is |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1146 compared against the current value of selected_window, MBW which is |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1147 compared against minibuf_window (if SELW doesn't match), and SCRW |
43595
b7964dae2379
(minibuf_selected_window): Renamed from Vminibuf_selected_window.
Kim F. Storm <storm@cua.dk>
parents:
43574
diff
changeset
|
1148 which is compared against minibuf_selected_window (if MBW matches). */ |
43242
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1149 |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1150 #define CURRENT_MODE_LINE_FACE_ID_3(SELW, MBW, SCRW) \ |
43282
4e1019bea048
(CURRENT_MODE_LINE_FACE_ID_3): Use mode_line_in_non_selected_windows.
Kim F. Storm <storm@cua.dk>
parents:
43242
diff
changeset
|
1151 ((!mode_line_in_non_selected_windows \ |
43242
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1152 || (SELW) == XWINDOW (selected_window) \ |
43282
4e1019bea048
(CURRENT_MODE_LINE_FACE_ID_3): Use mode_line_in_non_selected_windows.
Kim F. Storm <storm@cua.dk>
parents:
43242
diff
changeset
|
1153 || (minibuf_level > 0 \ |
43595
b7964dae2379
(minibuf_selected_window): Renamed from Vminibuf_selected_window.
Kim F. Storm <storm@cua.dk>
parents:
43574
diff
changeset
|
1154 && !NILP (minibuf_selected_window) \ |
43282
4e1019bea048
(CURRENT_MODE_LINE_FACE_ID_3): Use mode_line_in_non_selected_windows.
Kim F. Storm <storm@cua.dk>
parents:
43242
diff
changeset
|
1155 && (MBW) == XWINDOW (minibuf_window) \ |
43595
b7964dae2379
(minibuf_selected_window): Renamed from Vminibuf_selected_window.
Kim F. Storm <storm@cua.dk>
parents:
43574
diff
changeset
|
1156 && (SCRW) == XWINDOW (minibuf_selected_window))) \ |
43242
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1157 ? MODE_LINE_FACE_ID \ |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1158 : MODE_LINE_INACTIVE_FACE_ID) |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1159 |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1160 |
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1161 /* Return the desired face id for the mode line of window W. */ |
43202
d3a48ed9857d
(CURRENT_MODE_LINE_FACE_ID): New macro.
Kim F. Storm <storm@cua.dk>
parents:
42955
diff
changeset
|
1162 |
d3a48ed9857d
(CURRENT_MODE_LINE_FACE_ID): New macro.
Kim F. Storm <storm@cua.dk>
parents:
42955
diff
changeset
|
1163 #define CURRENT_MODE_LINE_FACE_ID(W) \ |
43242
e7ec5804aa1a
(CURRENT_MODE_LINE_FACE_ID_3): New macro.
Kim F. Storm <storm@cua.dk>
parents:
43211
diff
changeset
|
1164 (CURRENT_MODE_LINE_FACE_ID_3((W), XWINDOW (selected_window), (W))) |
43202
d3a48ed9857d
(CURRENT_MODE_LINE_FACE_ID): New macro.
Kim F. Storm <storm@cua.dk>
parents:
42955
diff
changeset
|
1165 |
25012 | 1166 /* Return the current height of the mode line of window W. If not |
33460 | 1167 known from current_mode_line_height, look at W's current glyph |
1168 matrix, or return a default based on the height of the font of the | |
1169 face `mode-line'. */ | |
1170 | |
1171 #define CURRENT_MODE_LINE_HEIGHT(W) \ | |
1172 (current_mode_line_height >= 0 \ | |
1173 ? current_mode_line_height \ | |
1174 : (MATRIX_MODE_LINE_HEIGHT ((W)->current_matrix) \ | |
1175 ? MATRIX_MODE_LINE_HEIGHT ((W)->current_matrix) \ | |
1176 : estimate_mode_line_height (XFRAME ((W)->frame), \ | |
43202
d3a48ed9857d
(CURRENT_MODE_LINE_FACE_ID): New macro.
Kim F. Storm <storm@cua.dk>
parents:
42955
diff
changeset
|
1177 CURRENT_MODE_LINE_FACE_ID (W)))) |
25012 | 1178 |
42753 | 1179 /* Return the current height of the header line of window W. If not |
33460 | 1180 known from current_header_line_height, look at W's current glyph |
1181 matrix, or return an estimation based on the height of the font of | |
1182 the face `header-line'. */ | |
1183 | |
1184 #define CURRENT_HEADER_LINE_HEIGHT(W) \ | |
1185 (current_header_line_height >= 0 \ | |
1186 ? current_header_line_height \ | |
1187 : (MATRIX_HEADER_LINE_HEIGHT ((W)->current_matrix) \ | |
1188 ? MATRIX_HEADER_LINE_HEIGHT ((W)->current_matrix) \ | |
1189 : estimate_mode_line_height (XFRAME ((W)->frame), \ | |
1190 HEADER_LINE_FACE_ID))) | |
25012 | 1191 |
1192 /* Return the height of the desired mode line of window W. */ | |
1193 | |
1194 #define DESIRED_MODE_LINE_HEIGHT(W) \ | |
1195 MATRIX_MODE_LINE_HEIGHT ((W)->desired_matrix) | |
1196 | |
42753 | 1197 /* Return the height of the desired header line of window W. */ |
25012 | 1198 |
25546 | 1199 #define DESIRED_HEADER_LINE_HEIGHT(W) \ |
1200 MATRIX_HEADER_LINE_HEIGHT ((W)->desired_matrix) | |
25012 | 1201 |
42753 | 1202 /* Value is non-zero if window W wants a mode line. */ |
25012 | 1203 |
1204 #define WINDOW_WANTS_MODELINE_P(W) \ | |
42828
48dd83c34137
(WINDOW_WANTS_MODELINE_P): Check window height > 1.
Richard M. Stallman <rms@gnu.org>
parents:
42753
diff
changeset
|
1205 (!MINI_WINDOW_P ((W)) \ |
25012 | 1206 && !(W)->pseudo_window_p \ |
42828
48dd83c34137
(WINDOW_WANTS_MODELINE_P): Check window height > 1.
Richard M. Stallman <rms@gnu.org>
parents:
42753
diff
changeset
|
1207 && 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
|
1208 && BUFFERP ((W)->buffer) \ |
42828
48dd83c34137
(WINDOW_WANTS_MODELINE_P): Check window height > 1.
Richard M. Stallman <rms@gnu.org>
parents:
42753
diff
changeset
|
1209 && !NILP (XBUFFER ((W)->buffer)->mode_line_format) \ |
51192
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
1210 && WINDOW_TOTAL_LINES (W) > 1) |
25012 | 1211 |
42753 | 1212 /* Value is non-zero if window W wants a header line. */ |
25012 | 1213 |
25546 | 1214 #define WINDOW_WANTS_HEADER_LINE_P(W) \ |
42828
48dd83c34137
(WINDOW_WANTS_MODELINE_P): Check window height > 1.
Richard M. Stallman <rms@gnu.org>
parents:
42753
diff
changeset
|
1215 (!MINI_WINDOW_P ((W)) \ |
25012 | 1216 && !(W)->pseudo_window_p \ |
42828
48dd83c34137
(WINDOW_WANTS_MODELINE_P): Check window height > 1.
Richard M. Stallman <rms@gnu.org>
parents:
42753
diff
changeset
|
1217 && 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
|
1218 && BUFFERP ((W)->buffer) \ |
42828
48dd83c34137
(WINDOW_WANTS_MODELINE_P): Check window height > 1.
Richard M. Stallman <rms@gnu.org>
parents:
42753
diff
changeset
|
1219 && !NILP (XBUFFER ((W)->buffer)->header_line_format) \ |
51192
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
1220 && WINDOW_TOTAL_LINES (W) > 1 + !NILP (XBUFFER ((W)->buffer)->mode_line_format)) |
25012 | 1221 |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1222 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1223 /* Return proper value to be used as baseline offset of font that has |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1224 ASCENT and DESCENT to draw characters by the font at the vertical |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1225 center of the line of frame F. |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1226 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1227 Here, our task is to find the value of BOFF in the following figure; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1228 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1229 -------------------------+-----------+- |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1230 -+-+---------+-+ | | |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1231 | | | | | | |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1232 | | | | F_ASCENT F_HEIGHT |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1233 | | | ASCENT | | |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1234 HEIGHT | | | | | |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1235 | | |-|-+------+-----------|------- baseline |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1236 | | | | BOFF | | |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1237 | |---------|-+-+ | | |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1238 | | | DESCENT | | |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1239 -+-+---------+-+ F_DESCENT | |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1240 -------------------------+-----------+- |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1241 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1242 -BOFF + DESCENT + (F_HEIGHT - HEIGHT) / 2 = F_DESCENT |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1243 BOFF = DESCENT + (F_HEIGHT - HEIGHT) / 2 - F_DESCENT |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1244 DESCENT = FONT->descent |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1245 HEIGHT = FONT_HEIGHT (FONT) |
51192
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
1246 F_DESCENT = (FRAME_FONT (F)->descent |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1247 - F->output_data.x->baseline_offset) |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1248 F_HEIGHT = FRAME_LINE_HEIGHT (F) |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1249 */ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1250 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1251 #define VCENTER_BASELINE_OFFSET(FONT, F) \ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1252 (FONT_DESCENT (FONT) \ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1253 + (FRAME_LINE_HEIGHT ((F)) - FONT_HEIGHT ((FONT)) \ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1254 + (FRAME_LINE_HEIGHT ((F)) > FONT_HEIGHT ((FONT)))) / 2 \ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1255 - (FONT_DESCENT (FRAME_FONT (F)) - FRAME_BASELINE_OFFSET (F))) |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
1256 |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1257 |
25012 | 1258 /*********************************************************************** |
1259 Faces | |
1260 ***********************************************************************/ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1261 |
25012 | 1262 /* Indices of face attributes in Lisp face vectors. Slot zero is the |
1263 symbol `face'. */ | |
1264 | |
1265 enum lface_attribute_index | |
1266 { | |
1267 LFACE_FAMILY_INDEX = 1, | |
1268 LFACE_SWIDTH_INDEX, | |
1269 LFACE_HEIGHT_INDEX, | |
1270 LFACE_WEIGHT_INDEX, | |
1271 LFACE_SLANT_INDEX, | |
1272 LFACE_UNDERLINE_INDEX, | |
1273 LFACE_INVERSE_INDEX, | |
1274 LFACE_FOREGROUND_INDEX, | |
1275 LFACE_BACKGROUND_INDEX, | |
1276 LFACE_STIPPLE_INDEX, | |
1277 LFACE_OVERLINE_INDEX, | |
1278 LFACE_STRIKE_THROUGH_INDEX, | |
1279 LFACE_BOX_INDEX, | |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1280 LFACE_FONT_INDEX, |
31177
24a1d86d0ee8
(enum lface_attribute_index): Add LFACE_INHERIT_INDEX.
Miles Bader <miles@gnu.org>
parents:
30722
diff
changeset
|
1281 LFACE_INHERIT_INDEX, |
35912
91b7d295be68
(enum lface_attribute_index): Add
Gerd Moellmann <gerd@gnu.org>
parents:
35732
diff
changeset
|
1282 LFACE_AVGWIDTH_INDEX, |
25012 | 1283 LFACE_VECTOR_SIZE |
1284 }; | |
1285 | |
1286 | |
1287 /* Box types of faces. */ | |
1288 | |
1289 enum face_box_type | |
1290 { | |
1291 /* No box around text. */ | |
1292 FACE_NO_BOX, | |
1293 | |
1294 /* Simple box of specified width and color. Default width is 1, and | |
1295 default color is the foreground color of the face. */ | |
1296 FACE_SIMPLE_BOX, | |
1297 | |
1298 /* Boxes with 3D shadows. Color equals the background color of the | |
1299 face. Width is specified. */ | |
1300 FACE_RAISED_BOX, | |
1301 FACE_SUNKEN_BOX | |
1302 }; | |
1303 | |
1304 | |
1305 /* Structure describing a realized face. | |
1306 | |
1307 For each Lisp face, 0..N realized faces can exist for different | |
1308 frames and different charsets. Realized faces are built from Lisp | |
1309 faces and text properties/overlays by merging faces and adding | |
1310 unspecified attributes from the `default' face. */ | |
1311 | |
1312 struct face | |
1313 { | |
1314 /* The id of this face. The id equals the index of this face in the | |
1315 vector faces_by_id of its face cache. */ | |
1316 int id; | |
247 | 1317 |
13407
5ebb99bc06bb
[HAVE_NTGUI]: Include win32.h.
Geoff Voelker <voelker@cs.washington.edu>
parents:
9572
diff
changeset
|
1318 #ifdef HAVE_WINDOW_SYSTEM |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1319 |
42709 | 1320 /* If non-zero, this is a GC that we can use without modification for |
1321 drawing the characters in this face. */ | |
25012 | 1322 GC gc; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1323 |
25012 | 1324 /* Font used for this face, or null if the font could not be loaded |
1325 for some reason. This points to a `font' slot of a struct | |
1326 font_info, and we should not call XFreeFont on it because the | |
1327 font may still be used somewhere else. */ | |
1328 XFontStruct *font; | |
1329 | |
38499
a4baa9de015f
(struct face): Change type of `stipple' to
Gerd Moellmann <gerd@gnu.org>
parents:
38266
diff
changeset
|
1330 /* 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
|
1331 an id as returned from load_pixmap. */ |
a4baa9de015f
(struct face): Change type of `stipple' to
Gerd Moellmann <gerd@gnu.org>
parents:
38266
diff
changeset
|
1332 int stipple; |
25012 | 1333 |
1334 #else /* not HAVE_WINDOW_SYSTEM */ | |
1335 | |
1336 /* Dummy. */ | |
1337 int stipple; | |
1338 | |
1339 #endif /* not HAVE_WINDOW_SYSTEM */ | |
1340 | |
1341 /* Pixel value of foreground color for X frames. Color index | |
1342 for tty frames. */ | |
1343 unsigned long foreground; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1344 |
25012 | 1345 /* Pixel value or color index of background color. */ |
1346 unsigned long background; | |
1347 | |
1348 /* Pixel value or color index of underline color. */ | |
1349 unsigned long underline_color; | |
1350 | |
1351 /* Pixel value or color index of overlined, strike-through, or box | |
1352 color. */ | |
1353 unsigned long overline_color; | |
1354 unsigned long strike_through_color; | |
1355 unsigned long box_color; | |
1356 | |
1357 /* The font's name. This points to a `name' of a font_info, and it | |
1358 must not be freed. */ | |
1359 char *font_name; | |
1360 | |
1361 /* Font info ID for this face's font. An ID is stored here because | |
1362 pointers to font_info structures may change. The reason is that | |
1363 they are pointers into a font table vector that is itself | |
1364 reallocated. */ | |
1365 int font_info_id; | |
1366 | |
1367 /* 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
|
1368 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
|
1369 Otherwise, a specific font is loaded from the set of fonts |
25012 | 1370 specified by the fontset given by the family attribute of the face. */ |
1371 int fontset; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1372 |
25012 | 1373 /* Pixmap width and height. */ |
1374 unsigned int pixmap_w, pixmap_h; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1375 |
25012 | 1376 /* 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
|
1377 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
|
1378 thickness, and the horizontal lines of box (top and bottom) are |
42753 | 1379 drawn inside of characters glyph area. The vertical lines of box |
36007
6be98ede1ec8
(struct face): Add comment for how to handle a negative value in
Kenichi Handa <handa@m17n.org>
parents:
35912
diff
changeset
|
1380 (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
|
1381 value is positive. */ |
25012 | 1382 int box_line_width; |
1383 | |
1384 /* Type of box drawn. A value of FACE_NO_BOX means no box is drawn | |
1385 around text in this face. A value of FACE_SIMPLE_BOX means a box | |
1386 of width box_line_width is drawn in color box_color. A value of | |
1387 FACE_RAISED_BOX or FACE_SUNKEN_BOX means a 3D box is drawn with | |
1388 shadow colors derived from the background color of the face. */ | |
1389 enum face_box_type box; | |
1390 | |
1391 /* If `box' above specifies a 3D type, 1 means use box_color for | |
1392 drawing shadows. */ | |
1393 unsigned use_box_color_for_shadows_p : 1; | |
1394 | |
1395 /* The Lisp face attributes this face realizes. All attributes | |
1396 in this vector are non-nil. */ | |
1397 Lisp_Object lface[LFACE_VECTOR_SIZE]; | |
1398 | |
1399 /* The hash value of this face. */ | |
1400 unsigned hash; | |
1401 | |
1402 /* 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
|
1403 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
|
1404 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
|
1405 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
|
1406 where the idea of Emacs charsets isn't applicable. */ |
25012 | 1407 int charset; |
1408 | |
1409 /* Non-zero if text in this face should be underlined, overlined, | |
1410 strike-through or have a box drawn around it. */ | |
1411 unsigned underline_p : 1; | |
1412 unsigned overline_p : 1; | |
1413 unsigned strike_through_p : 1; | |
1414 | |
1415 /* 1 means that the colors specified for this face could not be | |
1416 loaded, and were replaced by default colors, so they shouldn't be | |
1417 freed. */ | |
1418 unsigned foreground_defaulted_p : 1; | |
1419 unsigned background_defaulted_p : 1; | |
1420 | |
1421 /* 1 means that either no color is specified for underlining or that | |
40552 | 1422 the specified color couldn't be loaded. Use the foreground |
25012 | 1423 color when drawing in that case. */ |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1424 unsigned underline_defaulted_p : 1; |
25012 | 1425 |
1426 /* 1 means that either no color is specified for the corresponding | |
42753 | 1427 attribute or that the specified color couldn't be loaded. |
25012 | 1428 Use the foreground color when drawing in that case. */ |
1429 unsigned overline_color_defaulted_p : 1; | |
1430 unsigned strike_through_color_defaulted_p : 1; | |
1431 unsigned box_color_defaulted_p : 1; | |
1432 | |
1433 /* TTY appearances. Blinking is not yet implemented. Colors are | |
1434 found in `lface' with empty color string meaning the default | |
1435 color of the TTY. */ | |
1436 unsigned tty_bold_p : 1; | |
1437 unsigned tty_dim_p : 1; | |
1438 unsigned tty_underline_p : 1; | |
1439 unsigned tty_alt_charset_p : 1; | |
1440 unsigned tty_reverse_p : 1; | |
1441 unsigned tty_blinking_p : 1; | |
1442 | |
40556
69558454a8f9
(struct face) <colors_copied_bitwise_p>: New
Gerd Moellmann <gerd@gnu.org>
parents:
40552
diff
changeset
|
1443 /* 1 means that colors of this face may not be freed because they |
69558454a8f9
(struct face) <colors_copied_bitwise_p>: New
Gerd Moellmann <gerd@gnu.org>
parents:
40552
diff
changeset
|
1444 have been copied bitwise from a base face (see |
69558454a8f9
(struct face) <colors_copied_bitwise_p>: New
Gerd Moellmann <gerd@gnu.org>
parents:
40552
diff
changeset
|
1445 realize_x_face). */ |
69558454a8f9
(struct face) <colors_copied_bitwise_p>: New
Gerd Moellmann <gerd@gnu.org>
parents:
40552
diff
changeset
|
1446 unsigned colors_copied_bitwise_p : 1; |
69558454a8f9
(struct face) <colors_copied_bitwise_p>: New
Gerd Moellmann <gerd@gnu.org>
parents:
40552
diff
changeset
|
1447 |
48382
d4986198a59a
(struct face): Add `overstrike' field.
Miles Bader <miles@gnu.org>
parents:
47996
diff
changeset
|
1448 /* If non-zero, use overstrike (to simulate bold-face). */ |
d4986198a59a
(struct face): Add `overstrike' field.
Miles Bader <miles@gnu.org>
parents:
47996
diff
changeset
|
1449 unsigned overstrike : 1; |
d4986198a59a
(struct face): Add `overstrike' field.
Miles Bader <miles@gnu.org>
parents:
47996
diff
changeset
|
1450 |
25012 | 1451 /* Next and previous face in hash collision list of face cache. */ |
1452 struct face *next, *prev; | |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1453 |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1454 /* 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
|
1455 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
|
1456 struct face *ascii_face; |
25012 | 1457 }; |
1458 | |
1459 | |
1460 /* Color index indicating that face uses a terminal's default color. */ | |
1461 | |
1462 #define FACE_TTY_DEFAULT_COLOR ((unsigned long) -1) | |
1463 | |
26902
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1464 /* 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
|
1465 |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1466 #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
|
1467 |
42753 | 1468 /* Color index indicating that face uses an unknown background color. */ |
26902
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1469 |
264b83a3a688
Changes for separate unspecified foreground and background colors
Eli Zaretskii <eliz@gnu.org>
parents:
26850
diff
changeset
|
1470 #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
|
1471 |
25012 | 1472 /* Non-zero if FACE was realized for unibyte use. */ |
1473 | |
1474 #define FACE_UNIBYTE_P(FACE) ((FACE)->charset < 0) | |
1475 | |
1476 | |
1477 /* IDs of important faces known by the C face code. These are the IDs | |
1478 of the faces for CHARSET_ASCII. */ | |
1479 | |
1480 enum face_id | |
1481 { | |
1482 DEFAULT_FACE_ID, | |
1483 MODE_LINE_FACE_ID, | |
43202
d3a48ed9857d
(CURRENT_MODE_LINE_FACE_ID): New macro.
Kim F. Storm <storm@cua.dk>
parents:
42955
diff
changeset
|
1484 MODE_LINE_INACTIVE_FACE_ID, |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
1485 TOOL_BAR_FACE_ID, |
41119 | 1486 FRINGE_FACE_ID, |
25546 | 1487 HEADER_LINE_FACE_ID, |
25589
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
1488 SCROLL_BAR_FACE_ID, |
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
1489 BORDER_FACE_ID, |
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
1490 CURSOR_FACE_ID, |
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
1491 MOUSE_FACE_ID, |
25881
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
1492 MENU_FACE_ID, |
25012 | 1493 BASIC_FACE_ID_SENTINEL |
1494 }; | |
1495 | |
1496 | |
1497 /* A cache of realized faces. Each frame has its own cache because | |
1498 Emacs allows different frame-local face definitions. */ | |
1499 | |
1500 struct face_cache | |
1501 { | |
1502 /* Hash table of cached realized faces. */ | |
1503 struct face **buckets; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1504 |
25012 | 1505 /* Back-pointer to the frame this cache belongs to. */ |
1506 struct frame *f; | |
1507 | |
1508 /* A vector of faces so that faces can be referenced by an ID. */ | |
1509 struct face **faces_by_id; | |
1510 | |
1511 /* The allocated size, and number of used slots of faces_by_id. */ | |
1512 int size, used; | |
38904
db6c2951e6a7
(struct face_cache): Add member
Gerd Moellmann <gerd@gnu.org>
parents:
38630
diff
changeset
|
1513 |
db6c2951e6a7
(struct face_cache): Add member
Gerd Moellmann <gerd@gnu.org>
parents:
38630
diff
changeset
|
1514 /* Flag indicating that attributes of the `menu' face have been |
db6c2951e6a7
(struct face_cache): Add member
Gerd Moellmann <gerd@gnu.org>
parents:
38630
diff
changeset
|
1515 changed. */ |
db6c2951e6a7
(struct face_cache): Add member
Gerd Moellmann <gerd@gnu.org>
parents:
38630
diff
changeset
|
1516 unsigned menu_face_changed_p : 1; |
25012 | 1517 }; |
1518 | |
1519 | |
1520 /* Prepare face FACE for use on frame F. This must be called before | |
1521 using X resources of FACE. */ | |
1522 | |
1523 #define PREPARE_FACE_FOR_DISPLAY(F, FACE) \ | |
1524 if ((FACE)->gc == 0) \ | |
1525 prepare_face_for_display ((F), (FACE)); \ | |
1526 else \ | |
1527 (void) 0 | |
1528 | |
1529 /* Return a pointer to the face with ID on frame F, or null if such a | |
1530 face doesn't exist. */ | |
1531 | |
1532 #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
|
1533 (((unsigned) (ID) < FRAME_FACE_CACHE (F)->used) \ |
25012 | 1534 ? FRAME_FACE_CACHE (F)->faces_by_id[ID] \ |
1535 : NULL) | |
1536 | |
28254
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1537 #ifdef HAVE_WINDOW_SYSTEM |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1538 |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1539 /* 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
|
1540 |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1541 #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
|
1542 (SINGLE_BYTE_CHAR_P (CHAR) \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1543 ? (FACE) == (FACE)->ascii_face \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1544 : 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
|
1545 |
25012 | 1546 /* 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
|
1547 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
|
1548 This macro is only meaningful for multibyte character CHAR. */ |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1549 |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1550 #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
|
1551 (SINGLE_BYTE_CHAR_P (CHAR) \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1552 ? (FACE)->ascii_face->id \ |
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1553 : face_for_char ((F), (FACE), (CHAR))) |
25012 | 1554 |
28254
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1555 #else /* not HAVE_WINDOW_SYSTEM */ |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1556 |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1557 #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
|
1558 #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
|
1559 |
bc79dbcca2a1
[!HAVE_WINDOW_SYSTEM] (FACE_SUITABLE_FOR_CHAR_P,
Kenichi Handa <handa@m17n.org>
parents:
28221
diff
changeset
|
1560 #endif /* not HAVE_WINDOW_SYSTEM */ |
25012 | 1561 |
1562 /* Non-zero means face attributes have been changed since the last | |
1563 redisplay. Used in redisplay_internal. */ | |
1564 | |
1565 extern int face_change_count; | |
1566 | |
1567 | |
1568 | |
1569 | |
1570 /*********************************************************************** | |
50095
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1571 Fringes |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1572 ***********************************************************************/ |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1573 |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1574 enum fringe_bitmap_type |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1575 { |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1576 NO_FRINGE_BITMAP = 0, |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1577 LEFT_TRUNCATION_BITMAP, |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1578 RIGHT_TRUNCATION_BITMAP, |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1579 CONTINUED_LINE_BITMAP, |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1580 CONTINUATION_LINE_BITMAP, |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1581 OVERLAY_ARROW_BITMAP, |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1582 ZV_LINE_BITMAP, |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1583 MAX_FRINGE_BITMAPS |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1584 }; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1585 |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1586 struct fringe_bitmap |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1587 { |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1588 int width; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1589 int height; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1590 int period; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1591 unsigned char *bits; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1592 }; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1593 |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1594 /* Structure used to describe where and how to draw a fringe bitmap. |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1595 WHICH is the fringe bitmap to draw. WD and H is the (adjusted) |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1596 width and height of the bitmap, DH is the height adjustment (if |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1597 bitmap is periodic). X and Y are frame coordinates of the area to |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1598 display the bitmap, DY is relative offset of the bitmap into that |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1599 area. BX, NX, BY, NY specifies the area to clear if the bitmap |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1600 does not fill the entire area. FACE is the fringe face. */ |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1601 |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1602 struct draw_fringe_bitmap_params |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1603 { |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1604 enum fringe_bitmap_type which; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1605 int wd, h, dh; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1606 int x, y; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1607 int bx, nx, by, ny; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1608 struct face *face; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1609 }; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1610 |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1611 extern struct fringe_bitmap fringe_bitmaps[MAX_FRINGE_BITMAPS]; |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1612 |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1613 |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
1614 /*********************************************************************** |
25012 | 1615 Display Iterator |
1616 ***********************************************************************/ | |
1617 | |
1618 /* Iteration over things to display in current_buffer or in a string. | |
1619 | |
1620 The iterator handles: | |
1621 | |
1622 1. Overlay strings (after-string, before-string). | |
1623 2. Face properties. | |
1624 3. Invisible text properties. | |
1625 4. Selective display. | |
1626 5. Translation of characters via display tables. | |
1627 6. Translation of control characters to the forms `\003' or `^C'. | |
1628 7. `glyph' and `space-width' properties. | |
1629 | |
1630 Iterators are initialized by calling init_iterator or one of the | |
1631 equivalent functions below. A call to get_next_display_element | |
1632 loads the iterator structure with information about what next to | |
1633 display. A call to set_iterator_to_next increments the iterator's | |
1634 position. | |
1635 | |
1636 Characters from overlay strings, display table entries or control | |
1637 character translations are returned one at a time. For example, if | |
1638 we have a text of `a\x01' where `a' has a display table definition | |
1639 of `cd' and the control character is displayed with a leading | |
1640 arrow, then the iterator will return: | |
1641 | |
1642 Call Return Source Call next | |
1643 ----------------------------------------------------------------- | |
1644 next c display table move | |
1645 next d display table move | |
1646 next ^ control char move | |
1647 next A control char move | |
1648 | |
1649 The same mechanism is also used to return characters for ellipses | |
1650 displayed at the end of invisible text. | |
1651 | |
1652 CAVEAT: Under some circumstances, move_.* functions can be called | |
1653 asynchronously, e.g. when computing a buffer position from an x and | |
1654 y pixel position. This means that these functions and functions | |
1655 called from them SHOULD NOT USE xmalloc and alike. See also the | |
1656 comment at the start of xdisp.c. */ | |
1657 | |
1658 /* Enumeration describing what kind of display element an iterator is | |
1659 loaded with after a call to get_next_display_element. */ | |
1660 | |
1661 enum display_element_type | |
1662 { | |
1663 /* A normal character. */ | |
1664 IT_CHARACTER, | |
1665 | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1666 /* A composition sequence. */ |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1667 IT_COMPOSITION, |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1668 |
25012 | 1669 /* An image. */ |
1670 IT_IMAGE, | |
1671 | |
1672 /* A flexible width and height space. */ | |
1673 IT_STRETCH, | |
1674 | |
1675 /* End of buffer or string. */ | |
1676 IT_EOB, | |
1677 | |
1678 /* Truncation glyphs. Never returned by get_next_display_element. | |
1679 Used to get display information about truncation glyphs via | |
1680 produce_glyphs. */ | |
1681 IT_TRUNCATION, | |
1682 | |
1683 /* Continuation glyphs. See the comment for IT_TRUNCATION. */ | |
1684 IT_CONTINUATION | |
1685 }; | |
1686 | |
1687 | |
1688 /* An enumerator for each text property that has a meaning for display | |
1689 purposes. */ | |
1690 | |
1691 enum prop_idx | |
1692 { | |
1693 FONTIFIED_PROP_IDX, | |
1694 FACE_PROP_IDX, | |
1695 INVISIBLE_PROP_IDX, | |
1696 DISPLAY_PROP_IDX, | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1697 COMPOSITION_PROP_IDX, |
25012 | 1698 |
1699 /* Not a property. Used to indicate changes in overlays. */ | |
1700 OVERLAY_PROP_IDX, | |
1701 | |
1702 /* Sentinel. */ | |
1703 LAST_PROP_IDX | |
1704 }; | |
1705 | |
1706 | |
1707 struct it | |
1708 { | |
1709 /* The window in which we iterate over current_buffer (or a string). */ | |
1710 Lisp_Object window; | |
1711 struct window *w; | |
1712 | |
1713 /* The window's frame. */ | |
1714 struct frame *f; | |
1715 | |
1716 /* Function to call to load this structure with the next display | |
1717 element. */ | |
1718 int (* method) P_ ((struct it *it)); | |
1719 | |
1720 /* The next position at which to check for face changes, invisible | |
1721 text, overlay strings, end of text etc., which see. */ | |
1722 int stop_charpos; | |
1723 | |
1724 /* Maximum string or buffer position + 1. ZV when iterating over | |
1725 current_buffer. */ | |
1726 int end_charpos; | |
1727 | |
1728 /* C string to iterate over. Non-null means get characters from | |
1729 this string, otherwise characters are read from current_buffer | |
1730 or it->string. */ | |
1731 unsigned char *s; | |
1732 | |
1733 /* Number of characters in the string (s, or it->string) we iterate | |
1734 over. */ | |
1735 int string_nchars; | |
1736 | |
1737 /* Start and end of a visible region; -1 if the region is not | |
1738 visible in the window. */ | |
1739 int region_beg_charpos, region_end_charpos; | |
1740 | |
1741 /* Position at which redisplay end trigger functions should be run. */ | |
1742 int redisplay_end_trigger_charpos; | |
1743 | |
1744 /* 1 means multibyte characters are enabled. */ | |
1745 unsigned multibyte_p : 1; | |
1746 | |
1747 /* 1 means window has a mode line at its top. */ | |
25546 | 1748 unsigned header_line_p : 1; |
25012 | 1749 |
1750 /* 1 means `string' is the value of a `display' property. | |
1751 Don't handle some `display' properties in these strings. */ | |
1752 unsigned string_from_display_prop_p : 1; | |
1753 | |
1754 /* Display table in effect or null for none. */ | |
1755 struct Lisp_Char_Table *dp; | |
1756 | |
1757 /* Current display table vector to return characters from and its | |
1758 end. dpvec null means we are not returning characters from a | |
1759 display table entry; current.dpvec_index gives the current index | |
1760 into dpvec. This same mechanism is also used to return | |
1761 characters from translated control characters, i.e. `\003' or | |
1762 `^C'. */ | |
1763 Lisp_Object *dpvec, *dpend; | |
1764 | |
1765 /* Length in bytes of the char that filled dpvec. A value of zero | |
42753 | 1766 means that no such character is involved. */ |
25012 | 1767 int dpvec_char_len; |
1768 | |
1769 /* Face id of the iterator saved in case a glyph from dpvec contains | |
1770 a face. The face is restored when all glyphs from dpvec have | |
1771 been delivered. */ | |
1772 int saved_face_id; | |
1773 | |
1774 /* 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
|
1775 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
|
1776 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
|
1777 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
|
1778 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
|
1779 Lisp_Object ctl_chars[16]; |
25012 | 1780 |
1781 /* Current buffer or string position of the iterator, including | |
1782 position in overlay strings etc. */ | |
1783 struct display_pos current; | |
1784 | |
1785 /* Vector of overlays to process. Overlay strings are processed | |
1786 OVERLAY_STRING_CHUNK_SIZE at a time. */ | |
1787 #define OVERLAY_STRING_CHUNK_SIZE 3 | |
1788 Lisp_Object overlay_strings[OVERLAY_STRING_CHUNK_SIZE]; | |
1789 | |
1790 /* Total number of overlay strings to process. This can be > | |
1791 OVERLAY_STRING_CHUNK_SIZE. */ | |
1792 int n_overlay_strings; | |
1793 | |
1794 /* If non-nil, a Lisp string being processed. If | |
1795 current.overlay_string_index >= 0, this is an overlay string from | |
1796 pos. */ | |
1797 Lisp_Object string; | |
1798 | |
1799 /* Stack of saved values. New entries are pushed when we begin to | |
1800 process an overlay string or a string from a `glyph' property. | |
1801 Entries are popped when we return to deliver display elements | |
1802 from what we previously had. */ | |
1803 struct iterator_stack_entry | |
1804 { | |
1805 int stop_charpos; | |
1806 int face_id; | |
1807 Lisp_Object string; | |
1808 struct display_pos pos; | |
1809 int end_charpos; | |
1810 int string_nchars; | |
1811 enum glyph_row_area area; | |
1812 unsigned multibyte_p : 1; | |
1813 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
|
1814 unsigned display_ellipsis_p : 1; |
25012 | 1815 Lisp_Object space_width; |
1816 short voffset; | |
1817 Lisp_Object font_height; | |
1818 } | |
1819 stack[2]; | |
1820 | |
1821 /* Stack pointer. */ | |
1822 int sp; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1823 |
25012 | 1824 /* Setting of buffer-local variable selective-display-ellipsis. */ |
1825 unsigned selective_display_ellipsis_p : 1; | |
1826 | |
1827 /* 1 means control characters are translated into the form `^C' | |
1828 where the `^' can be replaced by a display table entry. */ | |
1829 unsigned ctl_arrow_p : 1; | |
1830 | |
1831 /* -1 means selective display hides everything between a \r and the | |
1832 next newline; > 0 means hide lines indented more than that value. */ | |
1833 int selective; | |
1834 | |
1835 /* An enumeration describing what the next display element is | |
1836 after a call to get_next_display_element. */ | |
1837 enum display_element_type what; | |
1838 | |
1839 /* Face to use. */ | |
1840 int face_id; | |
1841 | |
1842 /* Non-zero means that the current face has a box. */ | |
1843 unsigned face_box_p : 1; | |
1844 | |
1845 /* Non-null means that the current character is the first in a run | |
1846 of characters with box face. */ | |
1847 unsigned start_of_box_run_p : 1; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1848 |
25012 | 1849 /* Non-zero means that the current character is the last in a run |
1850 of characters with box face. */ | |
1851 unsigned end_of_box_run_p : 1; | |
1852 | |
1853 /* 1 means overlay strings at end_charpos have been processed. */ | |
1854 unsigned overlay_strings_at_end_processed_p : 1; | |
1855 | |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
1856 /* 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
|
1857 system. */ |
29474
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
1858 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
|
1859 |
a4a198e7b4e5
(struct it): Add starts_in_middle_of_char_p.
Gerd Moellmann <gerd@gnu.org>
parents:
29311
diff
changeset
|
1860 /* 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
|
1861 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
|
1862 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
|
1863 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
|
1864 |
34226
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
1865 /* 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
|
1866 skipped due to selective display. */ |
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
1867 unsigned face_before_selective_p : 1; |
2e38b27fd38b
(struct it): Add face_before_selective_p.
Gerd Moellmann <gerd@gnu.org>
parents:
33460
diff
changeset
|
1868 |
25012 | 1869 /* 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
|
1870 MODE_LINE_FACE_ID, etc, depending on what we are displaying. */ |
25012 | 1871 int base_face_id; |
1872 | |
1873 /* If what == IT_CHARACTER, character and length in bytes. This is | |
1874 a character from a buffer or string. It may be different from | |
1875 the character displayed in case that | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1876 unibyte_display_via_language_environment is set. |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1877 |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1878 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
|
1879 and length in bytes of the composition. */ |
25012 | 1880 int c, len; |
1881 | |
26850
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1882 /* 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
|
1883 chars of a composition. */ |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1884 int cmp_id, cmp_len; |
d00beb113ad5
(enum glyph_type): New member COMPOSITE_GLYPH.
Kenichi Handa <handa@m17n.org>
parents:
26766
diff
changeset
|
1885 |
25012 | 1886 /* The character to display, possibly translated to multibyte |
1887 if unibyte_display_via_language_environment is set. This | |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
1888 is set after produce_glyphs has been called. */ |
25012 | 1889 int char_to_display; |
1890 | |
1891 /* If what == IT_IMAGE, the id of the image to display. */ | |
1892 int image_id; | |
1893 | |
1894 /* Value of the `space-width' property, if any; nil if none. */ | |
1895 Lisp_Object space_width; | |
1896 | |
1897 /* Computed from the value of the `raise' property. */ | |
1898 short voffset; | |
1899 | |
1900 /* Value of the `height' property, if any; nil if none. */ | |
1901 Lisp_Object font_height; | |
1902 | |
1903 /* Object and position where the current display element came from. | |
1904 Object can be a Lisp string in case the current display element | |
1905 comes from an overlay string, or it is buffer. Position is | |
1906 a position in object. */ | |
1907 Lisp_Object object; | |
1908 struct text_pos position; | |
1909 | |
1910 /* 1 means lines are truncated. */ | |
1911 unsigned truncate_lines_p : 1; | |
1912 | |
1913 /* Number of columns per \t. */ | |
1914 short tab_width; | |
1915 | |
1916 /* Width in pixels of truncation and continuation glyphs. */ | |
1917 short truncation_pixel_width, continuation_pixel_width; | |
1918 | |
1919 /* First and last visible x-position in the display area. If window | |
51192
e7a9fef91d7d
(struct glyph_matrix): Rename members window_left_x
Kim F. Storm <storm@cua.dk>
parents:
50356
diff
changeset
|
1920 is hscrolled by n columns, first_visible_x == n * FRAME_COLUMN_WIDTH |
25012 | 1921 (f), and last_visible_x == pixel width of W + first_visible_x. */ |
1922 int first_visible_x, last_visible_x; | |
1923 | |
1924 /* Last visible y-position + 1 in the display area without a mode | |
1925 line, if the window has one. */ | |
1926 int last_visible_y; | |
1927 | |
28684
609d4aabf72c
(struct it): Remove member prompt_width, add extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents:
28417
diff
changeset
|
1928 /* Additional space in pixels between lines (for window systems |
42753 | 1929 only.) */ |
28684
609d4aabf72c
(struct it): Remove member prompt_width, add extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents:
28417
diff
changeset
|
1930 int extra_line_spacing; |
25012 | 1931 |
1932 /* If non-null, glyphs are produced in glyph_row with each call to | |
1933 produce_glyphs. */ | |
1934 struct glyph_row *glyph_row; | |
1935 | |
1936 /* The area of glyph_row to which glyphs are added. */ | |
1937 enum glyph_row_area area; | |
1938 | |
1939 /* Number of glyphs needed for the last character requested via | |
1940 produce_glyphs. This is 1 except for tabs. */ | |
1941 int nglyphs; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
1942 |
25012 | 1943 /* Width of the display element in pixels. Result of |
1944 produce_glyphs. */ | |
1945 int pixel_width; | |
1946 | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1947 /* Current, maximum logical, and maximum physical line height |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1948 information. Result of produce_glyphs. */ |
25012 | 1949 int ascent, descent, max_ascent, max_descent; |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
1950 int phys_ascent, phys_descent, max_phys_ascent, max_phys_descent; |
25012 | 1951 |
1952 /* Current x pixel position within the display line. This value | |
1953 does not include the width of continuation lines in front of the | |
1954 line. The value of current_x is automatically incremented by | |
1955 pixel_width with each call to produce_glyphs. */ | |
1956 int current_x; | |
1957 | |
1958 /* Accumulated width of continuation lines. If > 0, this means we | |
1959 are currently in a continuation line. This is initially zero and | |
1960 incremented/reset by display_line, move_it_to etc. */ | |
1961 int continuation_lines_width; | |
1962 | |
1963 /* Current y-position. Automatically incremented by the height of | |
1964 glyph_row in move_it_to and display_line. */ | |
1965 int current_y; | |
1966 | |
1967 /* Current vertical matrix position, or line number. Automatically | |
1968 incremented by move_it_to and display_line. */ | |
1969 int vpos; | |
1970 | |
1971 /* Horizontal matrix position reached in move_it_in_display_line. | |
1972 Only set there, not in display_line. */ | |
1973 int hpos; | |
1974 }; | |
1975 | |
1976 | |
1977 /* Access to positions of iterator IT. */ | |
1978 | |
1979 #define IT_CHARPOS(IT) CHARPOS ((IT).current.pos) | |
1980 #define IT_BYTEPOS(IT) BYTEPOS ((IT).current.pos) | |
1981 #define IT_STRING_CHARPOS(IT) CHARPOS ((IT).current.string_pos) | |
1982 #define IT_STRING_BYTEPOS(IT) BYTEPOS ((IT).current.string_pos) | |
1983 | |
1984 /* Test if IT has reached the end of its buffer or string. This will | |
1985 only work after get_next_display_element has been called. */ | |
1986 | |
1987 #define ITERATOR_AT_END_P(IT) ((IT)->what == IT_EOB) | |
1988 | |
1989 /* Non-zero means IT is at the end of a line. This is the case if it | |
1990 is either on a newline or on a carriage return and selective | |
1991 display hides the rest of the line. */ | |
1992 | |
1993 #define ITERATOR_AT_END_OF_LINE_P(IT) \ | |
1994 ((IT)->what == IT_CHARACTER \ | |
1995 && ((IT)->c == '\n' \ | |
1996 || ((IT)->c == '\r' && (IT)->selective))) | |
1997 | |
1998 /* Call produce_glyphs or produce_glyphs_hook, if set. Shortcut to | |
1999 avoid the function call overhead. */ | |
2000 | |
47101
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2001 #define PRODUCE_GLYPHS(IT) \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2002 do { \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2003 extern int inhibit_free_realized_faces; \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2004 if (rif != NULL) \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2005 rif->produce_glyphs ((IT)); \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2006 else \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2007 produce_glyphs ((IT)); \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2008 if ((IT)->glyph_row != NULL) \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2009 inhibit_free_realized_faces = 1; \ |
8deb7414f946
(PRODUCE_GLYPHS): Set inhibit_free_realized_faces
Richard M. Stallman <rms@gnu.org>
parents:
46463
diff
changeset
|
2010 } while (0) |
25012 | 2011 |
2012 /* Bit-flags indicating what operation move_it_to should perform. */ | |
2013 | |
2014 enum move_operation_enum | |
2015 { | |
2016 /* Stop if specified x-position is reached. */ | |
2017 MOVE_TO_X = 0x01, | |
2018 | |
2019 /* Stop if specified y-position is reached. */ | |
2020 MOVE_TO_Y = 0x02, | |
2021 | |
2022 /* Stop if specified vpos is reached. */ | |
2023 MOVE_TO_VPOS = 0x04, | |
2024 | |
2025 /* Stop if specified buffer or string position is reached. */ | |
2026 MOVE_TO_POS = 0x08 | |
2027 }; | |
2028 | |
2029 | |
2030 | |
2031 /*********************************************************************** | |
2032 Window-based redisplay interface | |
2033 ***********************************************************************/ | |
2034 | |
2035 /* Structure used to describe runs of lines that must be scrolled. */ | |
2036 | |
2037 struct run | |
2038 { | |
2039 /* Source and destination y pixel position. */ | |
2040 int desired_y, current_y; | |
2041 | |
2042 /* Source and destination vpos in matrix. */ | |
2043 int desired_vpos, current_vpos; | |
2044 | |
2045 /* Height in pixels, number of glyph rows. */ | |
2046 int height, nrows; | |
2047 }; | |
2048 | |
2049 | |
50356
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2050 /* Handlers for setting frame parameters. */ |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2051 |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2052 typedef void (*frame_parm_handler) P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2053 |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2054 |
25012 | 2055 /* Structure holding system-dependent interface functions needed |
2056 for window-based redisplay. */ | |
2057 | |
2058 struct redisplay_interface | |
2059 { | |
50356
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2060 /* Handlers for setting frame parameters. */ |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2061 frame_parm_handler *frame_parm_handlers; |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2062 |
25012 | 2063 /* Produce glyphs/get display metrics for the display element IT is |
2064 loaded with. */ | |
2065 void (*produce_glyphs) P_ ((struct it *it)); | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
2066 |
25012 | 2067 /* Write or insert LEN glyphs from STRING at the nominal output |
2068 position. */ | |
2069 void (*write_glyphs) P_ ((struct glyph *string, int len)); | |
2070 void (*insert_glyphs) P_ ((struct glyph *start, int len)); | |
2071 | |
2072 /* Clear from nominal output position to X. X < 0 means clear | |
2073 to right end of display. */ | |
2074 void (*clear_end_of_line) P_ ((int x)); | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
2075 |
25012 | 2076 /* Function to call to scroll the display as described by RUN on |
2077 window W. */ | |
2078 void (*scroll_run_hook) P_ ((struct window *w, struct run *run)); | |
2079 | |
2080 /* Function to call after a line in a display has been completely | |
2081 updated. Used to draw truncation marks and alike. DESIRED_ROW | |
2082 is the desired row which has been updated. */ | |
2083 void (*after_update_window_line_hook) P_ ((struct glyph_row *desired_row)); | |
2084 | |
2085 /* Function to call before beginning to update window W in | |
2086 window-based redisplay. */ | |
2087 void (*update_window_begin_hook) P_ ((struct window *w)); | |
2088 | |
2089 /* 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
|
2090 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
|
2091 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
|
2092 that contained glyphs in mouse-face were overwritten, so we |
42753 | 2093 have to update the mouse highlight. */ |
30162
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
2094 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
|
2095 int mouse_face_overwritten_p)); |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48382
diff
changeset
|
2096 |
25012 | 2097 /* Move cursor to row/column position VPOS/HPOS, pixel coordinates |
2098 Y/X. HPOS/VPOS are window-relative row and column numbers and X/Y | |
2099 are window-relative pixel positions. */ | |
2100 void (*cursor_to) P_ ((int vpos, int hpos, int y, int x)); | |
2101 | |
2102 /* Flush the display of frame F. For X, this is XFlush. */ | |
2103 void (*flush_display) P_ ((struct frame *f)); | |
2104 | |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2105 /* Flush the display of frame F if non-NULL. This is called |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2106 during redisplay, and should be NULL on systems which flushes |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2107 automatically before reading input. */ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2108 void (*flush_display_optional) P_ ((struct frame *f)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2109 |
30343
21d1c542f98e
Correct a typo in a comment.
Eli Zaretskii <eliz@gnu.org>
parents:
30225
diff
changeset
|
2110 /* Clear the mouse hightlight in window W, if there is any. */ |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2111 void (*clear_window_mouse_face) P_ ((struct window *w)); |
30162
b90768fb8580
(struct redisplay_interface): Add parameter
Gerd Moellmann <gerd@gnu.org>
parents:
30151
diff
changeset
|
2112 |
25012 | 2113 /* Set *LEFT and *RIGHT to the left and right overhang of GLYPH on |
2114 frame F. */ | |
2115 void (*get_glyph_overhangs) P_ ((struct glyph *glyph, struct frame *f, | |
2116 int *left, int *right)); | |
25185
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
2117 |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
2118 /* 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
|
2119 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
|
2120 desired rows have been made current. */ |
d3614d7b7583
(struct glyph_row): Add overlapping_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25119
diff
changeset
|
2121 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
|
2122 enum glyph_row_area area)); |
50095
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
2123 |
50193
dadd724b7ce9
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50149
diff
changeset
|
2124 #ifdef HAVE_WINDOW_SYSTEM |
dadd724b7ce9
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50149
diff
changeset
|
2125 |
50095
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
2126 /* Draw a fringe bitmap in window W of row ROW using parameters P. */ |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
2127 void (*draw_fringe_bitmap) P_ ((struct window *w, struct glyph_row *row, |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
2128 struct draw_fringe_bitmap_params *p)); |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
2129 |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2130 /* Get metrics of character CHAR2B in FONT of type FONT_TYPE. |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2131 Value is null if CHAR2B is not contained in the font. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2132 XCharStruct * (*per_char_metric) P_ ((XFontStruct *font, XChar2b *char2b, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2133 int font_type)); |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2134 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2135 /* Encode CHAR2B using encoding information from FONT_INFO. CHAR2B is |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2136 the two-byte form of C. Encoding is returned in *CHAR2B. If |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2137 TWO_BYTE_P is non-null, return non-zero there if font is two-byte. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2138 int (*encode_char) P_ ((int c, XChar2b *char2b, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2139 struct font_info *font_into, int *two_byte_p)); |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2140 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2141 /* Compute left and right overhang of glyph string S. |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2142 A NULL pointer if platform does not support this. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2143 void (*compute_glyph_string_overhangs) P_ ((struct glyph_string *s)); |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2144 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2145 /* Draw a glyph string S. */ |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2146 void (*draw_glyph_string) P_ ((struct glyph_string *s)); |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2147 |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2148 /* Define cursor CURSOR on frame F. */ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2149 void (*define_frame_cursor) P_ ((struct frame *f, Cursor cursor)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2150 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2151 /* Clear the area at (X,Y,WIDTH,HEIGHT) of frame F. */ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2152 void (*clear_frame_area) P_ ((struct frame *f, int x, int y, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2153 int width, int height)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2154 |
50243
3fb54e5a7201
(struct redisplay_interface): Add active_p argument to
Kim F. Storm <storm@cua.dk>
parents:
50217
diff
changeset
|
2155 /* Draw specified cursor CURSOR_TYPE of width CURSOR_WIDTH |
3fb54e5a7201
(struct redisplay_interface): Add active_p argument to
Kim F. Storm <storm@cua.dk>
parents:
50217
diff
changeset
|
2156 at row GLYPH_ROW on window W if ON_P is 1. If ON_P is |
3fb54e5a7201
(struct redisplay_interface): Add active_p argument to
Kim F. Storm <storm@cua.dk>
parents:
50217
diff
changeset
|
2157 0, don't draw cursor. If ACTIVE_P is 1, system caret |
3fb54e5a7201
(struct redisplay_interface): Add active_p argument to
Kim F. Storm <storm@cua.dk>
parents:
50217
diff
changeset
|
2158 should track this cursor (when applicable). */ |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2159 void (*draw_window_cursor) P_ ((struct window *w, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2160 struct glyph_row *glyph_row, |
50243
3fb54e5a7201
(struct redisplay_interface): Add active_p argument to
Kim F. Storm <storm@cua.dk>
parents:
50217
diff
changeset
|
2161 int x, int y, |
3fb54e5a7201
(struct redisplay_interface): Add active_p argument to
Kim F. Storm <storm@cua.dk>
parents:
50217
diff
changeset
|
2162 int cursor_type, int cursor_width, |
3fb54e5a7201
(struct redisplay_interface): Add active_p argument to
Kim F. Storm <storm@cua.dk>
parents:
50217
diff
changeset
|
2163 int on_p, int active_p)); |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2164 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2165 /* Draw vertical border for window W from (X,Y0) to (X,Y1). */ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2166 void (*draw_vertical_window_border) P_ ((struct window *w, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2167 int x, int y0, int y1)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2168 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2169 /* Shift display of frame F to make room for inserted glyphs. |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2170 The area at pixel (X,Y) of width WIDTH and height HEIGHT is |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2171 shifted right by SHIFT_BY pixels. */ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2172 void (*shift_glyphs_for_insert) P_ ((struct frame *f, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2173 int x, int y, int width, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2174 int height, int shift_by)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2175 |
50193
dadd724b7ce9
Fix compilation with --with-x=no.
Kim F. Storm <storm@cua.dk>
parents:
50149
diff
changeset
|
2176 #endif /* HAVE_WINDOW_SYSTEM */ |
25012 | 2177 }; |
2178 | |
2179 /* The current interface for window-based redisplay. */ | |
2180 | |
2181 extern struct redisplay_interface *rif; | |
2182 | |
2183 | |
2184 /*********************************************************************** | |
2185 Images | |
2186 ***********************************************************************/ | |
2187 | |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2188 #ifdef HAVE_WINDOW_SYSTEM |
25012 | 2189 |
2190 /* Structure forward declarations. */ | |
2191 | |
2192 struct image; | |
2193 | |
2194 | |
42753 | 2195 /* Each image format (JPEG, TIFF, ...) supported is described by |
25012 | 2196 a structure of the type below. */ |
2197 | |
2198 struct image_type | |
2199 { | |
2200 /* A symbol uniquely identifying the image type, .e.g `jpeg'. */ | |
2201 Lisp_Object *type; | |
2202 | |
2203 /* Check that SPEC is a valid image specification for the given | |
2204 image type. Value is non-zero if SPEC is valid. */ | |
2205 int (* valid_p) P_ ((Lisp_Object spec)); | |
2206 | |
2207 /* Load IMG which is used on frame F from information contained in | |
2208 IMG->spec. Value is non-zero if successful. */ | |
2209 int (* load) P_ ((struct frame *f, struct image *img)); | |
2210 | |
2211 /* Free resources of image IMG which is used on frame F. */ | |
2212 void (* free) P_ ((struct frame *f, struct image *img)); | |
2213 | |
2214 /* Next in list of all supported image types. */ | |
2215 struct image_type *next; | |
2216 }; | |
2217 | |
2218 | |
2219 /* Structure describing an image. Specific image formats like XBM are | |
2220 converted into this form, so that display only has to deal with | |
2221 this type of image. */ | |
2222 | |
2223 struct image | |
2224 { | |
2225 /* The time in seconds at which the image was last displayed. Set | |
2226 in prepare_image_for_display. */ | |
2227 unsigned long timestamp; | |
2228 | |
2229 /* Pixmaps of the image. */ | |
2230 Pixmap pixmap, mask; | |
2231 | |
2232 /* Colors allocated for this image, if any. Allocated via xmalloc. */ | |
2233 unsigned long *colors; | |
2234 int ncolors; | |
2235 | |
40263
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2236 /* A single `background color' for this image, for the use of anyone that |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2237 cares about such a thing. Only valid if the `background_valid' field |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2238 is true. This should generally be accessed by calling the accessor |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2239 macro `IMAGE_BACKGROUND', which will heuristically calculate a value |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2240 if necessary. */ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2241 unsigned long background; |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2242 |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2243 /* True if this image has a `transparent' background -- that is, is |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2244 uses an image mask. The accessor macro for this is |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2245 `IMAGE_BACKGROUND_TRANSPARENT'. */ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2246 unsigned background_transparent : 1; |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2247 |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2248 /* True if the `background' and `background_transparent' fields are |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2249 valid, respectively. */ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2250 unsigned background_valid : 1, background_transparent_valid : 1; |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2251 |
25012 | 2252 /* Width and height of the image. */ |
2253 int width, height; | |
2254 | |
2255 /* These values are used for the rectangles displayed for images | |
2256 that can't be loaded. */ | |
2257 #define DEFAULT_IMAGE_WIDTH 30 | |
2258 #define DEFAULT_IMAGE_HEIGHT 30 | |
2259 | |
28786
e18bbe250122
(DEFAULT_IMAGE_HEIGHT): New macro.
Gerd Moellmann <gerd@gnu.org>
parents:
28707
diff
changeset
|
2260 /* Percent of image height used as ascent. A value of |
42753 | 2261 CENTERED_IMAGE_ASCENT means draw the image centered on the |
28786
e18bbe250122
(DEFAULT_IMAGE_HEIGHT): New macro.
Gerd Moellmann <gerd@gnu.org>
parents:
28707
diff
changeset
|
2262 line. */ |
25012 | 2263 int ascent; |
2264 #define DEFAULT_IMAGE_ASCENT 50 | |
28786
e18bbe250122
(DEFAULT_IMAGE_HEIGHT): New macro.
Gerd Moellmann <gerd@gnu.org>
parents:
28707
diff
changeset
|
2265 #define CENTERED_IMAGE_ASCENT -1 |
25012 | 2266 |
2267 /* Lisp specification of this image. */ | |
2268 Lisp_Object spec; | |
2269 | |
2270 /* Relief to draw around the image. */ | |
2271 int relief; | |
2272 | |
35274
bc2b88ed2fa1
(struct image): Replace member `margin' with
Gerd Moellmann <gerd@gnu.org>
parents:
35054
diff
changeset
|
2273 /* 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
|
2274 int hmargin, vmargin; |
25012 | 2275 |
2276 /* Reference to the type of the image. */ | |
2277 struct image_type *type; | |
2278 | |
25954
ab0d41b6f746
(struct image): New member load_failed_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25881
diff
changeset
|
2279 /* 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
|
2280 unsigned load_failed_p; |
ab0d41b6f746
(struct image): New member load_failed_p.
Gerd Moellmann <gerd@gnu.org>
parents:
25881
diff
changeset
|
2281 |
25012 | 2282 /* A place for image types to store additional data. The member |
2283 data.lisp_val is marked during GC, so it's safe to store Lisp data | |
2284 there. Image types should free this data when their `free' | |
2285 function is called. */ | |
2286 struct | |
2287 { | |
2288 int int_val; | |
2289 void *ptr_val; | |
2290 Lisp_Object lisp_val; | |
2291 } data; | |
2292 | |
2293 /* Hash value of image specification to speed up comparisons. */ | |
2294 unsigned hash; | |
2295 | |
2296 /* Image id of this image. */ | |
2297 int id; | |
2298 | |
2299 /* Hash collision chain. */ | |
2300 struct image *next, *prev; | |
2301 }; | |
2302 | |
2303 | |
2304 /* Cache of images. Each frame has a cache. X frames with the same | |
2305 x_display_info share their caches. */ | |
2306 | |
2307 struct image_cache | |
2308 { | |
2309 /* Hash table of images. */ | |
2310 struct image **buckets; | |
2311 | |
2312 /* Vector mapping image ids to images. */ | |
2313 struct image **images; | |
2314 | |
2315 /* Allocated size of `images'. */ | |
2316 unsigned size; | |
2317 | |
2318 /* Number of images in the cache. */ | |
2319 unsigned used; | |
2320 | |
2321 /* Reference count (number of frames sharing this cache). */ | |
2322 int refcount; | |
2323 }; | |
2324 | |
2325 | |
2326 /* Value is a pointer to the image with id ID on frame F, or null if | |
2327 no image with that id exists. */ | |
2328 | |
2329 #define IMAGE_FROM_ID(F, ID) \ | |
2330 (((ID) >= 0 && (ID) < (FRAME_X_IMAGE_CACHE (F)->used)) \ | |
2331 ? FRAME_X_IMAGE_CACHE (F)->images[ID] \ | |
2332 : NULL) | |
2333 | |
2334 /* Size of bucket vector of image caches. Should be prime. */ | |
2335 | |
2336 #define IMAGE_CACHE_BUCKETS_SIZE 1001 | |
2337 | |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2338 #endif /* HAVE_WINDOW_SYSTEM */ |
25012 | 2339 |
2340 | |
2341 | |
2342 /*********************************************************************** | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2343 Tool-bars |
25012 | 2344 ***********************************************************************/ |
2345 | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2346 /* 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
|
2347 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
|
2348 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
|
2349 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2350 enum tool_bar_item_idx |
25012 | 2351 { |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2352 /* The key of the tool-bar item. Used to remove items when a binding |
25012 | 2353 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
|
2354 TOOL_BAR_ITEM_KEY, |
25012 | 2355 |
2356 /* 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
|
2357 TOOL_BAR_ITEM_ENABLED_P, |
25012 | 2358 |
2359 /* 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
|
2360 TOOL_BAR_ITEM_SELECTED_P, |
25012 | 2361 |
2362 /* Caption. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2363 TOOL_BAR_ITEM_CAPTION, |
25012 | 2364 |
2365 /* Image(s) to display. This is either a single image specification | |
2366 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
|
2367 TOOL_BAR_ITEM_IMAGES, |
25012 | 2368 |
2369 /* The binding. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2370 TOOL_BAR_ITEM_BINDING, |
25012 | 2371 |
2372 /* 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
|
2373 TOOL_BAR_ITEM_TYPE, |
25012 | 2374 |
2375 /* Help string. */ | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2376 TOOL_BAR_ITEM_HELP, |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2377 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2378 /* 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
|
2379 tool-bar item. */ |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2380 TOOL_BAR_ITEM_NSLOTS |
25012 | 2381 }; |
2382 | |
2383 | |
2384 /* 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
|
2385 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
|
2386 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2387 enum tool_bar_item_image |
25012 | 2388 { |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2389 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
|
2390 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
|
2391 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
|
2392 TOOL_BAR_IMAGE_DISABLED_DESELECTED |
25012 | 2393 }; |
2394 | |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2395 /* 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
|
2396 |
35732
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2397 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
|
2398 |
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2399 /* 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
|
2400 |
43713
f92c4d87863a
Change defvar_int def and vars to use EMACS_INT instead of just int.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
43595
diff
changeset
|
2401 extern EMACS_INT tool_bar_button_relief; |
25012 | 2402 |
35732
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2403 /* Default values of the above variables. */ |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2404 |
44965
d5a47b039e68
(DEFAULT_TOOL_BAR_BUTTON_MARGIN)
Pavel Janík <Pavel@Janik.cz>
parents:
44890
diff
changeset
|
2405 #define DEFAULT_TOOL_BAR_BUTTON_MARGIN 4 |
d5a47b039e68
(DEFAULT_TOOL_BAR_BUTTON_MARGIN)
Pavel Janík <Pavel@Janik.cz>
parents:
44890
diff
changeset
|
2406 #define DEFAULT_TOOL_BAR_BUTTON_RELIEF 1 |
35732
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2407 |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2408 /* 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
|
2409 |
1a54c78e6452
(Vtool_bar_button_margin:): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
35335
diff
changeset
|
2410 #define DEFAULT_TOOL_BAR_IMAGE_HEIGHT 24 |
25012 | 2411 |
2412 | |
2413 /*********************************************************************** | |
45521
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2414 Terminal Capabilities |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2415 ***********************************************************************/ |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2416 |
45550 | 2417 /* Each of these is a bit representing a terminal `capability' (bold, |
2418 inverse, etc). They are or'd together to specify the set of | |
2419 capabilities being queried for when calling `tty_capable_p' (which | |
2420 returns true if the terminal supports all of them). */ | |
45549 | 2421 |
45521
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2422 #define TTY_CAP_INVERSE 0x01 |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2423 #define TTY_CAP_UNDERLINE 0x02 |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2424 #define TTY_CAP_BOLD 0x04 |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2425 #define TTY_CAP_DIM 0x08 |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2426 #define TTY_CAP_BLINK 0x10 |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2427 #define TTY_CAP_ALT_CHARSET 0x20 |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2428 |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2429 |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2430 /*********************************************************************** |
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2431 Function Prototypes |
25012 | 2432 ***********************************************************************/ |
2433 | |
2434 /* Defined in xdisp.c */ | |
2435 | |
39433
65168fc5a6f5
(row_containing_pos): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
38904
diff
changeset
|
2436 struct glyph_row *row_containing_pos P_ ((struct window *, int, |
65168fc5a6f5
(row_containing_pos): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
38904
diff
changeset
|
2437 struct glyph_row *, |
40243
5a65c1e29273
(row_containing_pos): Adjust prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
40074
diff
changeset
|
2438 struct glyph_row *, int)); |
36702
e6d6ef7e0aef
(string_buffer_position): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36696
diff
changeset
|
2439 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
|
2440 int line_bottom_y P_ ((struct it *)); |
29818
34438531b886
(display_prop_intangible_p): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
29474
diff
changeset
|
2441 int display_prop_intangible_p P_ ((Lisp_Object)); |
38630
30acd3a34723
(resize_echo_area_exactly): Fix typo in function
Gerd Moellmann <gerd@gnu.org>
parents:
38550
diff
changeset
|
2442 void resize_echo_area_exactly P_ ((void)); |
25655
a75be4927319
Change prototype of resize_mini_window.
Gerd Moellmann <gerd@gnu.org>
parents:
25589
diff
changeset
|
2443 int resize_mini_window P_ ((struct window *, int)); |
25012 | 2444 int try_window P_ ((Lisp_Object, struct text_pos)); |
2445 void window_box P_ ((struct window *, int, int *, int *, int *, int *)); | |
2446 int window_box_height P_ ((struct window *)); | |
2447 int window_text_bottom_y P_ ((struct window *)); | |
2448 int window_box_width P_ ((struct window *, int)); | |
2449 int window_box_left P_ ((struct window *, int)); | |
2450 int window_box_right P_ ((struct window *, int)); | |
2451 void window_box_edges P_ ((struct window *, int, int *, int *, int *, int *)); | |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2452 int estimate_mode_line_height P_ ((struct frame *, enum face_id)); |
50246
84e4dd9629ee
(pixel_to_glyph_coords, glyph_to_pixel_coords):
Kim F. Storm <storm@cua.dk>
parents:
50243
diff
changeset
|
2453 void pixel_to_glyph_coords P_ ((struct frame *, int, int, int *, int *, |
84e4dd9629ee
(pixel_to_glyph_coords, glyph_to_pixel_coords):
Kim F. Storm <storm@cua.dk>
parents:
50243
diff
changeset
|
2454 NativeRectangle *, int)); |
84e4dd9629ee
(pixel_to_glyph_coords, glyph_to_pixel_coords):
Kim F. Storm <storm@cua.dk>
parents:
50243
diff
changeset
|
2455 int glyph_to_pixel_coords P_ ((struct window *, int, int, int *, int *)); |
25012 | 2456 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
|
2457 void redisplay_preserve_echo_area P_ ((int)); |
25012 | 2458 void set_cursor_from_row P_ ((struct window *, struct glyph_row *, |
2459 struct glyph_matrix *, int, int, int, int)); | |
2460 void init_iterator P_ ((struct it *, struct window *, int, | |
2461 int, struct glyph_row *, enum face_id)); | |
2462 void init_iterator_to_row_start P_ ((struct it *, struct window *, | |
2463 struct glyph_row *)); | |
2464 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
|
2465 void set_iterator_to_next P_ ((struct it *, int)); |
25012 | 2466 void produce_glyphs P_ ((struct it *)); |
2467 void produce_special_glyphs P_ ((struct it *, enum display_element_type)); | |
2468 void start_display P_ ((struct it *, struct window *, struct text_pos)); | |
2469 void move_it_to P_ ((struct it *, int, int, int, int, int)); | |
2470 void move_it_vertically P_ ((struct it *, int)); | |
35054
3efcaab7433e
(move_it_vertically_backward): Declare.
Dave Love <fx@gnu.org>
parents:
35022
diff
changeset
|
2471 void move_it_vertically_backward P_ ((struct it *, int)); |
25012 | 2472 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
|
2473 void move_it_past_eol P_ ((struct it *)); |
49834
c3d892afbca5
(in_display_vector_p): Declare.
Andreas Schwab <schwab@suse.de>
parents:
49600
diff
changeset
|
2474 int in_display_vector_p P_ ((struct it *)); |
25012 | 2475 int frame_mode_line_height P_ ((struct frame *)); |
2476 void highlight_trailing_whitespace P_ ((struct frame *, struct glyph_row *)); | |
50095
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
2477 void draw_row_fringe_bitmaps P_ ((struct window *, struct glyph_row *)); |
a9f9d27374b3
(enum fringe_bitmap_type): Define here.
Kim F. Storm <storm@cua.dk>
parents:
49834
diff
changeset
|
2478 void compute_fringe_widths P_ ((struct frame *, int)); |
25544
693ca9ba497a
Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents:
25520
diff
changeset
|
2479 extern Lisp_Object Qtool_bar; |
25303 | 2480 extern Lisp_Object Vshow_trailing_whitespace; |
43282
4e1019bea048
(CURRENT_MODE_LINE_FACE_ID_3): Use mode_line_in_non_selected_windows.
Kim F. Storm <storm@cua.dk>
parents:
43242
diff
changeset
|
2481 extern int mode_line_in_non_selected_windows; |
25012 | 2482 extern int redisplaying_p; |
28985
159b3efa8557
(Vimage_types): Add extern declaration.
Gerd Moellmann <gerd@gnu.org>
parents:
28786
diff
changeset
|
2483 extern Lisp_Object Vimage_types; |
25796
952b7a2a3d91
Add prototype for add_to_log.
Gerd Moellmann <gerd@gnu.org>
parents:
25708
diff
changeset
|
2484 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
|
2485 extern int help_echo_showing_p; |
33460 | 2486 extern int current_mode_line_height, current_header_line_height; |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2487 extern Lisp_Object help_echo_string, help_echo_window; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2488 extern Lisp_Object help_echo_object, previous_help_echo_string; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2489 extern int help_echo_pos; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2490 extern struct frame *last_mouse_frame; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2491 extern int last_tool_bar_item; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2492 extern int mouse_autoselect_window; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2493 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2494 #ifdef HAVE_WINDOW_SYSTEM |
25012 | 2495 |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2496 #if GLYPH_DEBUG |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2497 extern void dump_glyph_string P_ ((struct glyph_string *)); |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2498 #endif |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2499 |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2500 extern void x_get_glyph_overhangs P_ ((struct glyph *, struct frame *, |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2501 int *, int *)); |
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2502 extern void x_produce_glyphs P_ ((struct it *)); |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2503 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2504 extern void x_write_glyphs P_ ((struct glyph *, int)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2505 extern void x_insert_glyphs P_ ((struct glyph *, int len)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2506 extern void x_clear_end_of_line P_ ((int)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2507 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2508 extern int x_stretch_cursor_p; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2509 extern struct cursor_pos output_cursor; |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2510 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2511 extern void x_fix_overlapping_area P_ ((struct window *, struct glyph_row *, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2512 enum glyph_row_area)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2513 extern void draw_phys_cursor_glyph P_ ((struct window *, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2514 struct glyph_row *, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2515 enum draw_glyphs_face)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2516 extern void erase_phys_cursor P_ ((struct window *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2517 extern void display_and_set_cursor P_ ((struct window *, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2518 int, int, int, int, int)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2519 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2520 extern void set_output_cursor P_ ((struct cursor_pos *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2521 extern void x_cursor_to P_ ((int, int, int, int)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2522 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2523 extern void x_update_cursor P_ ((struct frame *, int)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2524 extern void x_clear_cursor P_ ((struct window *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2525 extern void x_draw_vertical_border P_ ((struct window *w)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2526 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2527 extern void frame_to_window_pixel_xy P_ ((struct window *, int *, int *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2528 extern void get_glyph_string_clip_rect P_ ((struct glyph_string *, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2529 NativeRectangle *nr)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2530 extern void note_mouse_highlight P_ ((struct frame *, int, int)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2531 extern void x_clear_window_mouse_face P_ ((struct window *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2532 extern void cancel_mouse_face P_ ((struct frame *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2533 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2534 extern void handle_tool_bar_click P_ ((struct frame *, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2535 int, int, int, unsigned int)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2536 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2537 /* msdos.c defines its own versions of these functions. */ |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2538 extern int clear_mouse_face P_ ((Display_Info *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2539 extern void show_mouse_face P_ ((Display_Info *, enum draw_glyphs_face)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2540 extern int cursor_in_mouse_face_p P_ ((struct window *w)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2541 |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2542 extern void expose_frame P_ ((struct frame *, int, int, int, int)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2543 extern int x_intersect_rectangles P_ ((XRectangle *, XRectangle *, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2544 XRectangle *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2545 #endif |
50149
5d83d663737a
(struct glyph): Reduce face_id member from 22 to
Kim F. Storm <storm@cua.dk>
parents:
50095
diff
changeset
|
2546 |
25012 | 2547 /* Defined in sysdep.c */ |
2548 | |
2549 void get_frame_size P_ ((int *, int *)); | |
2550 void request_sigio P_ ((void)); | |
2551 void unrequest_sigio P_ ((void)); | |
2552 int tabs_safe_p P_ ((void)); | |
2553 void init_baud_rate P_ ((void)); | |
2554 void init_sigio P_ ((int)); | |
2555 | |
25881
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
2556 /* Defined in xfaces.c */ |
54d9b33d9c4b
(enum face_id): Add MENU_FACE_ID.
Gerd Moellmann <gerd@gnu.org>
parents:
25796
diff
changeset
|
2557 |
27961
c6664d216f5a
(x_free_colors): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
27859
diff
changeset
|
2558 #ifdef HAVE_X_WINDOWS |
c6664d216f5a
(x_free_colors): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
27859
diff
changeset
|
2559 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
|
2560 #endif |
25012 | 2561 |
25589
0ef06feb96ab
(SCROLL_BAR_FACE_ID, BORDER_FACE_ID,
Gerd Moellmann <gerd@gnu.org>
parents:
25546
diff
changeset
|
2562 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
|
2563 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
|
2564 Lisp_Object tty_color_name P_ ((struct frame *, int)); |
25012 | 2565 void clear_face_cache P_ ((int)); |
25119
04c0fc908742
(load_color, lookup_derived_face): Declare
Eli Zaretskii <eliz@gnu.org>
parents:
25081
diff
changeset
|
2566 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
|
2567 enum lface_attribute_index)); |
25012 | 2568 void unload_color P_ ((struct frame *, unsigned long)); |
2569 int ascii_face_of_lisp_face P_ ((struct frame *, int)); | |
2570 void prepare_face_for_display P_ ((struct frame *, struct face *)); | |
46463
8cdf38364f8d
(xstricmp): Declaration updated.
Ken Raeburn <raeburn@raeburn.org>
parents:
45550
diff
changeset
|
2571 int xstricmp P_ ((const unsigned char *, const unsigned char *)); |
28221
6622698b83d6
(struct glyph): New member glyph_not_available_p.
Kenichi Handa <handa@m17n.org>
parents:
27961
diff
changeset
|
2572 int lookup_face P_ ((struct frame *, Lisp_Object *, int, struct face *)); |
25012 | 2573 int lookup_named_face P_ ((struct frame *, Lisp_Object, int)); |
2574 int smaller_face P_ ((struct frame *, int, int)); | |
2575 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
|
2576 int lookup_derived_face P_ ((struct frame *, Lisp_Object, int, int)); |
25012 | 2577 void init_frame_faces P_ ((struct frame *)); |
2578 void free_frame_faces P_ ((struct frame *)); | |
2579 void recompute_basic_faces P_ ((struct frame *)); | |
2580 int face_at_buffer_position P_ ((struct window *, int, int, int, int *, | |
2581 int, int)); | |
36671
b5aa229bcb18
(face_at_string_position): Change prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36250
diff
changeset
|
2582 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
|
2583 int, int *, enum face_id, int)); |
25012 | 2584 int compute_char_face P_ ((struct frame *, int, Lisp_Object)); |
2585 void free_all_realized_faces P_ ((Lisp_Object)); | |
2586 extern Lisp_Object Qforeground_color, Qbackground_color; | |
32543
4ea276abceba
(unspecified_fg, unspecified_bg): Declare.
Eli Zaretskii <eliz@gnu.org>
parents:
32459
diff
changeset
|
2587 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
|
2588 void free_realized_multibyte_face P_ ((struct frame *, int)); |
25012 | 2589 |
2590 /* Defined in xfns.c */ | |
2591 | |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2592 #ifdef HAVE_X_WINDOWS |
25708
a6aabf050a60
Add prototypes for gamma_correct and
Gerd Moellmann <gerd@gnu.org>
parents:
25655
diff
changeset
|
2593 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
|
2594 #endif |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2595 #ifdef WINDOWSNT |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2596 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
|
2597 #endif |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2598 |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2599 #ifdef HAVE_WINDOW_SYSTEM |
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2600 |
25708
a6aabf050a60
Add prototypes for gamma_correct and
Gerd Moellmann <gerd@gnu.org>
parents:
25655
diff
changeset
|
2601 void x_kill_gs_process P_ ((Pixmap, struct frame *)); |
25012 | 2602 int x_screen_planes P_ ((struct frame *)); |
2603 void x_implicitly_set_name P_ ((struct frame *, Lisp_Object, Lisp_Object)); | |
2604 struct image_cache *make_image_cache P_ ((void)); | |
2605 void free_image_cache P_ ((struct frame *)); | |
2606 void clear_image_cache P_ ((struct frame *, int)); | |
2607 void forall_images_in_image_cache P_ ((struct frame *, | |
2608 void (*) P_ ((struct image *)))); | |
2609 int valid_image_p P_ ((Lisp_Object)); | |
2610 void prepare_image_for_display P_ ((struct frame *, struct image *)); | |
2611 int lookup_image P_ ((struct frame *, Lisp_Object)); | |
41061
9687641007d3
(image_background, image_background_transparent):
Richard M. Stallman <rms@gnu.org>
parents:
40556
diff
changeset
|
2612 |
9687641007d3
(image_background, image_background_transparent):
Richard M. Stallman <rms@gnu.org>
parents:
40556
diff
changeset
|
2613 #ifdef HAVE_X_WINDOWS |
40263
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2614 unsigned long image_background P_ ((struct image *, struct frame *, |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2615 XImage *ximg)); |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2616 int image_background_transparent P_ ((struct image *, struct frame *, |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2617 XImage *mask)); |
41061
9687641007d3
(image_background, image_background_transparent):
Richard M. Stallman <rms@gnu.org>
parents:
40556
diff
changeset
|
2618 #endif /* HAVE_X_WINDOWS */ |
9687641007d3
(image_background, image_background_transparent):
Richard M. Stallman <rms@gnu.org>
parents:
40556
diff
changeset
|
2619 |
34447
387e9f41661e
Change external declaration of tip_frame.
Gerd Moellmann <gerd@gnu.org>
parents:
34280
diff
changeset
|
2620 extern Lisp_Object tip_frame; |
25012 | 2621 extern Window tip_window; |
30225
2e0e027ab8f8
(Fx_show_tip): Adjust number of parameters
Gerd Moellmann <gerd@gnu.org>
parents:
30162
diff
changeset
|
2622 EXFUN (Fx_show_tip, 6); |
25012 | 2623 EXFUN (Fx_hide_tip, 0); |
36250
3c4e5b3d7c4a
(start_hourglass, cancel_hourglass)
Gerd Moellmann <gerd@gnu.org>
parents:
36200
diff
changeset
|
2624 extern void start_hourglass P_ ((void)); |
3c4e5b3d7c4a
(start_hourglass, cancel_hourglass)
Gerd Moellmann <gerd@gnu.org>
parents:
36200
diff
changeset
|
2625 extern void cancel_hourglass P_ ((void)); |
3c4e5b3d7c4a
(start_hourglass, cancel_hourglass)
Gerd Moellmann <gerd@gnu.org>
parents:
36200
diff
changeset
|
2626 extern int display_hourglass_p; |
25012 | 2627 |
40263
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2628 /* Returns the background color of IMG, calculating one heuristically if |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2629 necessary. If non-zero, XIMG is an existing XImage object to use for |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2630 the heuristic. */ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2631 |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2632 #define IMAGE_BACKGROUND(img, f, ximg) \ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2633 ((img)->background_valid \ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2634 ? (img)->background \ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2635 : image_background (img, f, ximg)) |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2636 |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2637 /* Returns true if IMG has a `transparent' background, using heuristics |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2638 to decide if necessary. If non-zero, MASK is an existing XImage |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2639 object to use for the heuristic. */ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2640 |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2641 #define IMAGE_BACKGROUND_TRANSPARENT(img, f, mask) \ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2642 ((img)->background_transparent_valid \ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2643 ? (img)->background_transparent \ |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2644 : image_background_transparent (img, f, mask)) |
3657a6c97b2f
(struct image): Add `background', `background_valid', and
Miles Bader <miles@gnu.org>
parents:
40243
diff
changeset
|
2645 |
27626
79dc811783de
Change HAVE_X_WINDOWS to HAVE_WINDOW_SYSTEM,
Andrew Innes <andrewi@gnu.org>
parents:
27002
diff
changeset
|
2646 #endif /* HAVE_WINDOW_SYSTEM */ |
25012 | 2647 |
2648 | |
2649 /* Defined in xmenu.c */ | |
2650 | |
2651 int popup_activated P_ ((void)); | |
2652 | |
25344
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2653 /* Defined in dispnew.c */ |
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2654 |
37609
c6d7c9d92543
(inverse_video): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
36937
diff
changeset
|
2655 extern int inverse_video; |
39447
97363868cbb1
(required_matrix_width, required_matrix_height):
Gerd Moellmann <gerd@gnu.org>
parents:
39433
diff
changeset
|
2656 extern int required_matrix_width P_ ((struct window *)); |
97363868cbb1
(required_matrix_width, required_matrix_height):
Gerd Moellmann <gerd@gnu.org>
parents:
39433
diff
changeset
|
2657 extern int required_matrix_height P_ ((struct window *)); |
50217
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2658 extern Lisp_Object mode_line_string P_ ((struct window *, int, int, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2659 enum window_part, int *)); |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2660 extern Lisp_Object marginal_area_string P_ ((struct window *, int, int, |
10510d1bf1b6
* dispextern.h (Display_Info): Generic typedef for *_display_info.
Kim F. Storm <storm@cua.dk>
parents:
50193
diff
changeset
|
2661 enum window_part, int *)); |
21515 | 2662 extern void redraw_frame P_ ((struct frame *)); |
2663 extern void redraw_garbaged_frames P_ ((void)); | |
2664 extern void cancel_line P_ ((int, struct frame *)); | |
2665 extern void init_desired_glyphs P_ ((struct frame *)); | |
2666 extern int scroll_frame_lines P_ ((struct frame *, int, int, int, int)); | |
2667 extern int direct_output_for_insert P_ ((int)); | |
2668 extern int direct_output_forward_char P_ ((int)); | |
2669 extern int update_frame P_ ((struct frame *, int, int)); | |
2670 extern int scrolling P_ ((struct frame *)); | |
2671 extern void bitch_at_user P_ ((void)); | |
25012 | 2672 void adjust_glyphs P_ ((struct frame *)); |
2673 void free_glyphs P_ ((struct frame *)); | |
2674 void free_window_matrices P_ ((struct window *)); | |
2675 void check_glyph_memory P_ ((void)); | |
2676 void mirrored_line_dance P_ ((struct glyph_matrix *, int, int, int *, char *)); | |
2677 void clear_glyph_matrix P_ ((struct glyph_matrix *)); | |
2678 void clear_current_matrices P_ ((struct frame *f)); | |
2679 void clear_desired_matrices P_ ((struct frame *)); | |
2680 void shift_glyph_matrix P_ ((struct window *, struct glyph_matrix *, | |
2681 int, int, int)); | |
2682 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
|
2683 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
|
2684 int, int, int, int)); |
25012 | 2685 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
|
2686 void increment_row_positions P_ ((struct glyph_row *, int, int)); |
25012 | 2687 void enable_glyph_matrix_rows P_ ((struct glyph_matrix *, int, int, int)); |
2688 void clear_glyph_row P_ ((struct glyph_row *)); | |
2689 void prepare_desired_row P_ ((struct glyph_row *)); | |
2690 int line_hash_code P_ ((struct glyph_row *)); | |
2691 void set_window_update_flags P_ ((struct window *, int)); | |
2692 void write_glyphs P_ ((struct glyph *, int)); | |
2693 void insert_glyphs P_ ((struct glyph *, int)); | |
2694 void redraw_frame P_ ((struct frame *)); | |
2695 void redraw_garbaged_frames P_ ((void)); | |
2696 int scroll_cost P_ ((struct frame *, int, int, int)); | |
2697 int direct_output_for_insert P_ ((int)); | |
2698 int direct_output_forward_char P_ ((int)); | |
2699 int update_frame P_ ((struct frame *, int, int)); | |
2700 void update_single_window P_ ((struct window *, int)); | |
2701 int scrolling P_ ((struct frame *)); | |
36696
ba2a7a0cfb84
(buffer_posn_from_coords): Adjust prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
36671
diff
changeset
|
2702 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
|
2703 Lisp_Object *, struct display_pos *)); |
25344
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2704 void do_pending_window_change P_ ((int)); |
98eb0a0280e7
(NO_PROMPT_IN_BUFFER): Removed.
Gerd Moellmann <gerd@gnu.org>
parents:
25303
diff
changeset
|
2705 void change_frame_size P_ ((struct frame *, int, int, int, int, int)); |
25012 | 2706 void bitch_at_user P_ ((void)); |
2707 Lisp_Object sit_for P_ ((int, int, int, int, int)); | |
2708 void init_display P_ ((void)); | |
2709 void syms_of_display P_ ((void)); | |
30722
1c138ac4bf6d
(Qredisplay_dont_pause): Declare extern.
Gerd Moellmann <gerd@gnu.org>
parents:
30475
diff
changeset
|
2710 extern Lisp_Object Qredisplay_dont_pause; |
21515 | 2711 |
2712 /* Defined in term.c */ | |
25012 | 2713 |
21515 | 2714 extern void ring_bell P_ ((void)); |
2715 extern void set_terminal_modes P_ ((void)); | |
2716 extern void reset_terminal_modes P_ ((void)); | |
2717 extern void update_begin P_ ((struct frame *)); | |
2718 extern void update_end P_ ((struct frame *)); | |
2719 extern void set_terminal_window P_ ((int)); | |
2720 extern void set_scroll_region P_ ((int, int)); | |
2721 extern void turn_off_insert P_ ((void)); | |
2722 extern void turn_off_highlight P_ ((void)); | |
2723 extern void background_highlight P_ ((void)); | |
2724 extern void clear_frame P_ ((void)); | |
2725 extern void clear_end_of_line P_ ((int)); | |
2726 extern void clear_end_of_line_raw P_ ((int)); | |
2727 extern void delete_glyphs P_ ((int)); | |
2728 extern void ins_del_lines P_ ((int, int)); | |
2729 extern int string_cost P_ ((char *)); | |
2730 extern int per_line_cost P_ ((char *)); | |
2731 extern void calculate_costs P_ ((struct frame *)); | |
42955
7174ca8100e4
Add prototype for set_tty_color_mode and tty_setup_colors.
Eli Zaretskii <eliz@gnu.org>
parents:
42870
diff
changeset
|
2732 extern void set_tty_color_mode P_ ((struct frame *, Lisp_Object)); |
7174ca8100e4
Add prototype for set_tty_color_mode and tty_setup_colors.
Eli Zaretskii <eliz@gnu.org>
parents:
42870
diff
changeset
|
2733 extern void tty_setup_colors P_ ((int)); |
21515 | 2734 extern void term_init P_ ((char *)); |
2735 extern void fatal P_ ((/* char *, ... */)); | |
25012 | 2736 void cursor_to P_ ((int, int)); |
45521
d60b0f201386
(tty_capable_p): New function.
Miles Bader <miles@gnu.org>
parents:
44965
diff
changeset
|
2737 extern int tty_capable_p P_ ((struct frame *, unsigned, unsigned long, unsigned long)); |
21515 | 2738 |
2739 /* Defined in scroll.c */ | |
25012 | 2740 |
21515 | 2741 extern int scrolling_max_lines_saved P_ ((int, int, int *, int *, int *)); |
2742 extern int scroll_cost P_ ((struct frame *, int, int, int)); | |
2743 extern void do_line_insertion_deletion_costs P_ ((struct frame *, char *, | |
2744 char *, char *, char *, | |
2745 char *, char *, int)); | |
25012 | 2746 void scrolling_1 P_ ((struct frame *, int, int, int, int *, int *, int *, |
2747 int *, int)); | |
2748 | |
50356
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2749 /* Defined in frame.c */ |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2750 |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2751 #ifdef HAVE_WINDOW_SYSTEM |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2752 |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2753 /* Types we might convert a resource string into. */ |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2754 enum resource_types |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2755 { |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2756 RES_TYPE_NUMBER, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2757 RES_TYPE_FLOAT, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2758 RES_TYPE_BOOLEAN, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2759 RES_TYPE_STRING, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2760 RES_TYPE_SYMBOL |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2761 }; |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2762 |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2763 extern Lisp_Object x_get_arg P_ ((Display_Info *, Lisp_Object, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2764 Lisp_Object, char *, char *class, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2765 enum resource_types)); |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2766 extern Lisp_Object x_frame_get_arg P_ ((struct frame *, Lisp_Object, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2767 Lisp_Object, char *, char *, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2768 enum resource_types)); |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2769 extern Lisp_Object x_frame_get_and_record_arg P_ (( |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2770 struct frame *, Lisp_Object, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2771 Lisp_Object, char *, char *, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2772 enum resource_types)); |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2773 extern Lisp_Object x_default_parameter P_ ((struct frame *, Lisp_Object, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2774 Lisp_Object, Lisp_Object, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2775 char *, char *, |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2776 enum resource_types)); |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2777 |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2778 #endif /* HAVE_WINDOW_SYSTEM */ |
933b5f877c91
(frame_parm_handler): New typedef.
Kim F. Storm <storm@cua.dk>
parents:
50301
diff
changeset
|
2779 |
25012 | 2780 #endif /* not DISPEXTERN_H_INCLUDED */ |