annotate src/dispextern.h @ 25529:7ae6423812ae

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