annotate src/frame.h @ 14648:45d13c154bb4

(get_doc_string): Move static vars outside the function, and rename to get_doc_string_buffer and get_doc_string_buffer_size.
author Richard M. Stallman <rms@gnu.org>
date Thu, 22 Feb 1996 18:21:03 +0000
parents f258b4fd44c0
children a3c8776451ce
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
1 /* Define frame-object for GNU Emacs.
7307
cd81dba38a49 Update copyright.
Karl Heuer <kwzh@gnu.org>
parents: 7094
diff changeset
2 Copyright (C) 1993, 1994 Free Software Foundation, Inc.
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
3
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
4 This file is part of GNU Emacs.
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
6 GNU Emacs is free software; you can redistribute it and/or modify
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
7 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
8 the Free Software Foundation; either version 2, or (at your option)
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
9 any later version.
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
10
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
11 GNU Emacs is distributed in the hope that it will be useful,
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
14 GNU General Public License for more details.
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
15
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
17 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: 13568
diff changeset
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 13568
diff changeset
19 Boston, MA 02111-1307, USA. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
20
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
21
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
22 /* Miscellanea. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
23
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
24 /* Nonzero means don't assume anything about current
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
25 contents of actual terminal frame */
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
26 extern int frame_garbaged;
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
27
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
28 /* Nonzero means FRAME_MESSAGE_BUF (selected_frame) is being used by
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
29 print. */
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
30 extern int message_buf_print;
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
31
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
32
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
33 /* The structure representing a frame.
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
34
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
35 We declare this even if MULTI_FRAME is not defined, because when
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
36 we lack multi-frame support, we use one instance of this structure
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
37 to represent the one frame we support. This is cleaner than
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
38 having miscellaneous random variables scattered about. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
39
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
40 enum output_method
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
41 { output_termcap, output_x_window, output_msdos_raw, output_win32 };
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
42
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
43 struct frame
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
44 {
8826
9f5965fe4f6b (struct frame, selected_frame, last_nonminibuf_frame): Use EMACS_INT.
Richard M. Stallman <rms@gnu.org>
parents: 8233
diff changeset
45 EMACS_INT size;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
46 struct Lisp_Vector *next;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
47
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
48 /* All Lisp_Object components must come first.
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
49 Only EMACS_INT values can be intermixed with them.
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
50 That ensures they are all aligned normally. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
51
14215
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
52 /* Name of this frame: a Lisp string. It is used for looking up resources,
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
53 as well as for the title in some cases. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
54 Lisp_Object name;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
55
12274
f3383ea95b06 (struct frame): New field icon_name.
Richard M. Stallman <rms@gnu.org>
parents: 11493
diff changeset
56 /* The name to use for the icon, the last time
f3383ea95b06 (struct frame): New field icon_name.
Richard M. Stallman <rms@gnu.org>
parents: 11493
diff changeset
57 it was refreshed. nil means not explicitly specified. */
f3383ea95b06 (struct frame): New field icon_name.
Richard M. Stallman <rms@gnu.org>
parents: 11493
diff changeset
58 Lisp_Object icon_name;
f3383ea95b06 (struct frame): New field icon_name.
Richard M. Stallman <rms@gnu.org>
parents: 11493
diff changeset
59
14215
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
60 /* This is the frame title specified explicitly, if any.
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
61 Usually it is nil. */
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
62 Lisp_Object title;
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
63
3591
507f64624555 Apply typo patches from Paul Eggert.
Jim Blandy <jimb@redhat.com>
parents: 3518
diff changeset
64 /* The frame which should receive keystrokes that occur in this
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
65 frame, or nil if they should go to the frame itself. This is
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
66 usually nil, but if the frame is minibufferless, we can use this
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
67 to redirect keystrokes to a surrogate minibuffer frame when
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
68 needed.
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
69
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
70 Note that a value of nil is different than having the field point
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
71 to the frame itself. Whenever the Fselect_frame function is used
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
72 to shift from one frame to the other, any redirections to the
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
73 original frame are shifted to the newly selected frame; if
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
74 focus_frame is nil, Fselect_frame will leave it alone. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
75 Lisp_Object focus_frame;
357
1ad871406b12 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 261
diff changeset
76
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
77 /* This frame's root window. Every frame has one.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
78 If the frame has only a minibuffer window, this is it.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
79 Otherwise, if the frame has a minibuffer window, this is its sibling. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
80 Lisp_Object root_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
81
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
82 /* This frame's selected window.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
83 Each frame has its own window hierarchy
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
84 and one of the windows in it is selected within the frame.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
85 The selected window of the selected frame is Emacs's selected window. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
86 Lisp_Object selected_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
87
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
88 /* This frame's minibuffer window.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
89 Most frames have their own minibuffer windows,
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
90 but only the selected frame's minibuffer window
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
91 can actually appear to exist. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
92 Lisp_Object minibuffer_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
93
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
94 /* Parameter alist of this frame.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
95 These are the parameters specified when creating the frame
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
96 or modified with modify-frame-parameters. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
97 Lisp_Object param_alist;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
98
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
99 /* List of scroll bars on this frame.
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
100 Actually, we don't specify exactly what is stored here at all; the
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
101 scroll bar implementation code can use it to store anything it likes.
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
102 This field is marked by the garbage collector. It is here
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
103 instead of in the `display' structure so that the garbage
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
104 collector doesn't need to look inside the window-system-dependent
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
105 structure. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
106 Lisp_Object scroll_bars;
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
107 Lisp_Object condemned_scroll_bars;
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
108
2396
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
109 /* List of elements to display in the menu bar.
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
110 The elements have the form (KEY STRING . nil) to start;
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
111 when they are displayed, the hpos of the left edge goes in the cddr. */
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
112 Lisp_Object menu_bar_items;
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
113
2396
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
114 /* Alist of elements (FACE-NAME . FACE-VECTOR-DATA). */
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
115 Lisp_Object face_alist;
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
116
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
117 /* A vector that records the entire structure of this frame's menu bar.
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
118 For the format of the data, see extensive comments in xmenu.c.
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
119 Only the X toolkit version uses this. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
120 Lisp_Object menu_bar_vector;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
121 /* Number of elements in the vector that have meaningful data. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
122 EMACS_INT menu_bar_items_used;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
123
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
124 /* Predicate for selecting buffers for other-buffer. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
125 Lisp_Object buffer_predicate;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
126
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
127 /* Beyond here, there should be no more Lisp_Object components. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
128
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
129
11493
7a15a07093c2 (struct frame): New member namebuf.
Karl Heuer <kwzh@gnu.org>
parents: 11351
diff changeset
130 /* A buffer to hold the frame's name. We can't use the Lisp string's
7a15a07093c2 (struct frame): New member namebuf.
Karl Heuer <kwzh@gnu.org>
parents: 11351
diff changeset
131 pointer (`name', above) because it might get relocated. */
7a15a07093c2 (struct frame): New member namebuf.
Karl Heuer <kwzh@gnu.org>
parents: 11351
diff changeset
132 char *namebuf;
7a15a07093c2 (struct frame): New member namebuf.
Karl Heuer <kwzh@gnu.org>
parents: 11351
diff changeset
133
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
134 /* glyphs as they appear on the frame */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
135 struct frame_glyphs *current_glyphs;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
136
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
137 /* glyphs we'd like to appear on the frame */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
138 struct frame_glyphs *desired_glyphs;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
139
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
140 /* See do_line_insertion_deletion_costs for info on these arrays. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
141 /* Cost of inserting 1 line on this frame */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
142 int *insert_line_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
143 /* Cost of deleting 1 line on this frame */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
144 int *delete_line_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
145 /* Cost of inserting n lines on this frame */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
146 int *insert_n_lines_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
147 /* Cost of deleting n lines on this frame */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
148 int *delete_n_lines_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
149
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
150 /* glyphs for the mode line */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
151 struct frame_glyphs *temp_glyphs;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
152
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
153 /* Intended cursor position of this frame.
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
154 Measured in characters, counting from upper left corner
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
155 within the frame. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
156 int cursor_x;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
157 int cursor_y;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
158
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
159 /* Actual cursor position of this frame, and the character under it.
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
160 (Not used for terminal frames.) */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
161 int phys_cursor_x;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
162 int phys_cursor_y;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
163 /* This is handy for undrawing the cursor, because current_glyphs is
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
164 not always accurate when in do_scrolling. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
165 GLYPH phys_cursor_glyph;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
166
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
167 /* Size of this frame, in units of characters. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
168 EMACS_INT height;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
169 EMACS_INT width;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
170
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
171 /* New height and width for pending size change. 0 if no change pending. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
172 int new_height, new_width;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
173
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
174 /* The output method says how the contents of this frame
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
175 are displayed. It could be using termcap, or using an X window. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
176 enum output_method output_method;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
177
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
178 /* A structure of auxiliary data used for displaying the contents.
12665
427a3d6560bf (struct frame): Rename `display' member to `output_data'.
Richard M. Stallman <rms@gnu.org>
parents: 12543
diff changeset
179 struct x_output is used for X window frames;
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
180 it is defined in xterm.h.
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
181 struct win32_output is used for Win32 window frames;
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
182 it is defined in w32term.h. */
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
183 union output_data { struct x_output *x; struct win32_output *win32; int nothing; } output_data;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
184
11005
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
185 #ifdef MULTI_KBOARD
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
186 /* A pointer to the kboard structure associated with this frame.
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
187 For termcap frames, this points to initial_kboard. For X frames,
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
188 it will be the same as display.x->display_info->kboard. */
11351
beecf2972ed3 (struct frame): Use `struct kboard', not KBOARD.
Richard M. Stallman <rms@gnu.org>
parents: 11005
diff changeset
189 struct kboard *kboard;
11005
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
190 #endif
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
191
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
192 /* Number of lines of menu bar. */
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
193 int menu_bar_lines;
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
194
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
195 #if defined (USE_X_TOOLKIT) || defined (HAVE_NTGUI)
5657
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
196 /* Nonzero means using a menu bar that comes from the X toolkit. */
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
197 int external_menu_bar;
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
198 #endif
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
199
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
200 /* Nonzero if last attempt at redisplay on this frame was preempted. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
201 char display_preempted;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
202
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
203 /* visible is nonzero if the frame is currently displayed; we check
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
204 it to see if we should bother updating the frame's contents.
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
205 DON'T SET IT DIRECTLY; instead, use FRAME_SET_VISIBLE.
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
206
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
207 Note that, since invisible frames aren't updated, whenever a
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
208 frame becomes visible again, it must be marked as garbaged. The
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
209 FRAME_SAMPLE_VISIBILITY macro takes care of this.
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
210
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
211 iconified is nonzero if the frame is currently iconified.
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
212
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
213 Asynchronous input handlers should NOT change these directly;
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
214 instead, they should change async_visible or async_iconified, and
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
215 let the FRAME_SAMPLE_VISIBILITY macro set visible and iconified
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
216 at the next redisplay.
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
217
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
218 These should probably be considered read-only by everyone except
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
219 FRAME_SAMPLE_VISIBILITY.
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
220
6183
242d3fed9285 Fix typo in comment.
Karl Heuer <kwzh@gnu.org>
parents: 5657
diff changeset
221 These two are mutually exclusive. They might both be zero, if the
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
222 frame has been made invisible without an icon. */
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
223 char visible, iconified;
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
224
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
225 /* Asynchronous input handlers change these, and
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
226 FRAME_SAMPLE_VISIBILITY copies them into visible and iconified.
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
227 See FRAME_SAMPLE_VISIBILITY, below. */
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
228 #ifdef __STDC__
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
229 volatile
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
230 #endif
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
231 char async_visible, async_iconified;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
232
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
233 /* Nonzero if this frame should be redrawn. */
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
234 #ifdef __STDC__
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
235 volatile
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
236 #endif
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
237 char garbaged;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
238
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
239 /* True if frame actually has a minibuffer window on it.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
240 0 if using a minibuffer window that isn't on this frame. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
241 char has_minibuffer;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
242
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
243 /* 0 means, if this frame has just one window,
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
244 show no modeline for that window. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
245 char wants_modeline;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
246
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
247 /* Non-zero if the hardware device this frame is displaying on can
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
248 support scroll bars. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
249 char can_have_scroll_bars;
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
250
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
251 /* If can_have_scroll_bars is non-zero, this is non-zero if we should
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
252 actually display them on this frame. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
253 char has_vertical_scroll_bars;
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
254
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
255 /* Non-0 means raise this frame to the top of the heap when selected. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
256 char auto_raise;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
257
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
258 /* Non-0 means lower this frame to the bottom of the stack when left. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
259 char auto_lower;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
260
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
261 /* True if frame's root window can't be split. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
262 char no_split;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
263
998
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
264 /* If this is set, then Emacs won't change the frame name to indicate
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
265 the current buffer, etcetera. If the user explicitly sets the frame
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
266 name, this gets set. If the user sets the name to Qnil, this is
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
267 cleared. */
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
268 char explicit_name;
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
269
10665
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
270 /* Nonzero if size of some window on this frame has changed. */
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
271 char window_sizes_changed;
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
272
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
273 /* Storage for messages to this frame. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
274 char *message_buf;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
275
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
276 /* Nonnegative if current redisplay should not do scroll computation
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
277 for lines beyond a certain vpos. This is the vpos. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
278 int scroll_bottom_vpos;
7094
b473ea5a3473 (struct frame): New fields menu_bar_vector and menu_bar_items_used.
Richard M. Stallman <rms@gnu.org>
parents: 6183
diff changeset
279
9164
fbdd7a2e62f4 (scroll_bar_pixel_width, scroll_bar_cols): Update comment.
Karl Heuer <kwzh@gnu.org>
parents: 8948
diff changeset
280 /* Width of the scroll bar, in pixels and in characters.
fbdd7a2e62f4 (scroll_bar_pixel_width, scroll_bar_cols): Update comment.
Karl Heuer <kwzh@gnu.org>
parents: 8948
diff changeset
281 scroll_bar_cols tracks scroll_bar_pixel_width if the latter is positive;
fbdd7a2e62f4 (scroll_bar_pixel_width, scroll_bar_cols): Update comment.
Karl Heuer <kwzh@gnu.org>
parents: 8948
diff changeset
282 a zero value in scroll_bar_pixel_width means to compute the actual width
fbdd7a2e62f4 (scroll_bar_pixel_width, scroll_bar_cols): Update comment.
Karl Heuer <kwzh@gnu.org>
parents: 8948
diff changeset
283 on the fly, using scroll_bar_cols and the current font width. */
8948
5f79babaa7d2 (FRAME_SCROLL_BAR_PIXEL_WIDTH): New macro, supersedes
Karl Heuer <kwzh@gnu.org>
parents: 8900
diff changeset
284 int scroll_bar_pixel_width;
5f79babaa7d2 (FRAME_SCROLL_BAR_PIXEL_WIDTH): New macro, supersedes
Karl Heuer <kwzh@gnu.org>
parents: 8900
diff changeset
285 int scroll_bar_cols;
10120
8b5ae8d2eefc (struct frame): New field cost_calculation_baud_rate.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
286
8b5ae8d2eefc (struct frame): New field cost_calculation_baud_rate.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
287 /* The baud rate that was used to calculate costs for this frame. */
8b5ae8d2eefc (struct frame): New field cost_calculation_baud_rate.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
288 int cost_calculation_baud_rate;
12543
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
289
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
290 /* Nonzero if the mouse has moved on this display
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
291 since the last time we checked. */
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
292 char mouse_moved;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
293 };
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
294
11005
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
295 #ifdef MULTI_KBOARD /* Note that MULTI_KBOARD implies MULTI_FRAME */
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
296 #define FRAME_KBOARD(f) ((f)->kboard)
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
297 #else
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
298 #define FRAME_KBOARD(f) (&the_only_kboard)
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
299 #endif
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
300
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
301 #ifdef MULTI_FRAME
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
302
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
303 typedef struct frame *FRAME_PTR;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
304
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
305 #define XFRAME(p) ((struct frame *) XPNTR (p))
10288
e4a6f55757a9 (XSETFRAME): Use pseudovector.
Richard M. Stallman <rms@gnu.org>
parents: 10208
diff changeset
306 #define XSETFRAME(a, b) (XSETPSEUDOVECTOR (a, b, PVEC_FRAME))
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
307
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
308 #define WINDOW_FRAME(w) (w)->frame
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
309
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
310 #define FRAME_X_P(f) ((f)->output_method == output_x_window)
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
311 #define FRAME_WIN32_P(f) ((f)->output_method == output_win32)
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
312
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
313 /* FRAME_WINDOW_P tests whether the frame is a window, and is
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
314 defined to be the predicate for the window system being used. */
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
315 #ifdef HAVE_X_WINDOWS
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
316 #define FRAME_WINDOW_P(f) FRAME_X_P (f)
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
317 #endif
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
318 #ifdef HAVE_NTGUI
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
319 #define FRAME_WINDOW_P(f) FRAME_WIN32_P (f)
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
320 #endif
13568
01ec2620dd87 (FRAME_WINDOW_P): Always define it one way or another.
Richard M. Stallman <rms@gnu.org>
parents: 13411
diff changeset
321 #ifndef FRAME_WINDOW_P
01ec2620dd87 (FRAME_WINDOW_P): Always define it one way or another.
Richard M. Stallman <rms@gnu.org>
parents: 13411
diff changeset
322 #define FRAME_WINDOW_P(f) (0)
01ec2620dd87 (FRAME_WINDOW_P): Always define it one way or another.
Richard M. Stallman <rms@gnu.org>
parents: 13411
diff changeset
323 #endif
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
324
12665
427a3d6560bf (struct frame): Rename `display' member to `output_data'.
Richard M. Stallman <rms@gnu.org>
parents: 12543
diff changeset
325 #define FRAME_LIVE_P(f) ((f)->output_data.nothing != 0)
979
268c7b5da35b *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 765
diff changeset
326 #define FRAME_TERMCAP_P(f) ((f)->output_method == output_termcap)
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
327 #define FRAME_MINIBUF_ONLY_P(f) \
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
328 EQ (FRAME_ROOT_WINDOW (f), FRAME_MINIBUF_WINDOW (f))
979
268c7b5da35b *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 765
diff changeset
329 #define FRAME_HAS_MINIBUF_P(f) ((f)->has_minibuffer)
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
330 #define FRAME_CURRENT_GLYPHS(f) (f)->current_glyphs
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
331 #define FRAME_DESIRED_GLYPHS(f) (f)->desired_glyphs
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
332 #define FRAME_TEMP_GLYPHS(f) (f)->temp_glyphs
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
333 #define FRAME_HEIGHT(f) (f)->height
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
334 #define FRAME_WIDTH(f) (f)->width
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
335 #define FRAME_NEW_HEIGHT(f) (f)->new_height
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
336 #define FRAME_NEW_WIDTH(f) (f)->new_width
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
337 #define FRAME_MENU_BAR_LINES(f) (f)->menu_bar_lines
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
338 #if defined (USE_X_TOOLKIT) || defined (HAVE_NTGUI)
5657
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
339 #define FRAME_EXTERNAL_MENU_BAR(f) (f)->external_menu_bar
8233
5b063488f2f8 (FRAME_EXTERNAL_MENU_BAR) [!USE_X_TOOLKIT]: Give zero.
Richard M. Stallman <rms@gnu.org>
parents: 7307
diff changeset
340 #else
5b063488f2f8 (FRAME_EXTERNAL_MENU_BAR) [!USE_X_TOOLKIT]: Give zero.
Richard M. Stallman <rms@gnu.org>
parents: 7307
diff changeset
341 #define FRAME_EXTERNAL_MENU_BAR(f) 0
5b063488f2f8 (FRAME_EXTERNAL_MENU_BAR) [!USE_X_TOOLKIT]: Give zero.
Richard M. Stallman <rms@gnu.org>
parents: 7307
diff changeset
342 #endif
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
343 #define FRAME_CURSOR_X(f) (f)->cursor_x
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
344 #define FRAME_CURSOR_Y(f) (f)->cursor_y
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
345 #define FRAME_VISIBLE_P(f) ((f)->visible != 0)
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
346 #define FRAME_SET_VISIBLE(f,p) \
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
347 ((f)->async_visible = (p), FRAME_SAMPLE_VISIBILITY (f))
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
348 #define SET_FRAME_GARBAGED(f) (frame_garbaged = 1, f->garbaged = 1)
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
349 #define FRAME_GARBAGED_P(f) (f)->garbaged
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
350 #define FRAME_NO_SPLIT_P(f) (f)->no_split
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
351 #define FRAME_WANTS_MODELINE_P(f) (f)->wants_modeline
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
352 #define FRAME_ICONIFIED_P(f) (f)->iconified
10665
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
353 #define FRAME_WINDOW_SIZES_CHANGED(f) (f)->window_sizes_changed
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
354 #define FRAME_MINIBUF_WINDOW(f) (f)->minibuffer_window
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
355 #define FRAME_ROOT_WINDOW(f) (f)->root_window
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
356 #define FRAME_SELECTED_WINDOW(f) (f)->selected_window
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
357 #define SET_GLYPHS_FRAME(glyphs,frame) ((glyphs)->frame = (frame))
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
358 #define FRAME_INSERT_COST(f) (f)->insert_line_cost
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
359 #define FRAME_DELETE_COST(f) (f)->delete_line_cost
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
360 #define FRAME_INSERTN_COST(f) (f)->insert_n_lines_cost
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
361 #define FRAME_DELETEN_COST(f) (f)->delete_n_lines_cost
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
362 #define FRAME_MESSAGE_BUF(f) (f)->message_buf
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
363 #define FRAME_SCROLL_BOTTOM_VPOS(f) (f)->scroll_bottom_vpos
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
364 #define FRAME_FOCUS_FRAME(f) (f)->focus_frame
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
365 #define FRAME_CAN_HAVE_SCROLL_BARS(f) ((f)->can_have_scroll_bars)
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
366 #define FRAME_HAS_VERTICAL_SCROLL_BARS(f) ((f)->has_vertical_scroll_bars)
8948
5f79babaa7d2 (FRAME_SCROLL_BAR_PIXEL_WIDTH): New macro, supersedes
Karl Heuer <kwzh@gnu.org>
parents: 8900
diff changeset
367 #define FRAME_SCROLL_BAR_PIXEL_WIDTH(f) ((f)->scroll_bar_pixel_width)
5f79babaa7d2 (FRAME_SCROLL_BAR_PIXEL_WIDTH): New macro, supersedes
Karl Heuer <kwzh@gnu.org>
parents: 8900
diff changeset
368 #define FRAME_SCROLL_BAR_COLS(f) ((f)->scroll_bar_cols)
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
369 #define FRAME_SCROLL_BARS(f) ((f)->scroll_bars)
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
370 #define FRAME_CONDEMNED_SCROLL_BARS(f) ((f)->condemned_scroll_bars)
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
371 #define FRAME_MENU_BAR_ITEMS(f) ((f)->menu_bar_items)
10120
8b5ae8d2eefc (struct frame): New field cost_calculation_baud_rate.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
372 #define FRAME_COST_BAUD_RATE(f) ((f)->cost_calculation_baud_rate)
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
373
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
374 /* Emacs's redisplay code could become confused if a frame's
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
375 visibility changes at arbitrary times. For example, if a frame is
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
376 visible while the desired glyphs are being built, but becomes
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
377 invisible before they are updated, then some rows of the
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
378 desired_glyphs will be left marked as enabled after redisplay is
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
379 complete, which should never happen. The next time the frame
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
380 becomes visible, redisplay will probably barf.
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
381
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
382 Currently, there are no similar situations involving iconified, but
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
383 the principle is the same.
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
384
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
385 So instead of having asynchronous input handlers directly set and
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
386 clear the frame's visibility and iconification flags, they just set
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
387 the async_visible and async_iconified flags; the redisplay code
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
388 calls the FRAME_SAMPLE_VISIBILITY macro before doing any redisplay,
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
389 which sets visible and iconified from their asynchronous
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
390 counterparts.
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
391
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
392 Synchronous code must use the FRAME_SET_VISIBLE macro.
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
393
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
394 Also, if a frame used to be invisible, but has just become visible,
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
395 it must be marked as garbaged, since redisplay hasn't been keeping
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
396 up its contents. */
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
397 #define FRAME_SAMPLE_VISIBILITY(f) \
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
398 (((f)->async_visible && ! (f)->visible) ? SET_FRAME_GARBAGED (f) : 0, \
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
399 (f)->visible = (f)->async_visible, \
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
400 (f)->iconified = (f)->async_iconified)
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
401
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
402 #define CHECK_FRAME(x, i) \
485
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
403 { \
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
404 if (! FRAMEP (x)) \
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
405 x = wrong_type_argument (Qframep, (x)); \
485
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
406 }
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
407
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
408 #define CHECK_LIVE_FRAME(x, i) \
485
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
409 { \
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
410 if (! FRAMEP (x) \
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
411 || ! FRAME_LIVE_P (XFRAME (x))) \
1821
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1776
diff changeset
412 x = wrong_type_argument (Qframe_live_p, (x)); \
485
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
413 }
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
414
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
415 /* FOR_EACH_FRAME (LIST_VAR, FRAME_VAR) followed by a statement is a
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
416 `for' loop which iterates over the elements of Vframe_list. The
2252
9793d8654e23 * frame.h (FOR_EACH_FRAME): Change the definition so that
Jim Blandy <jimb@redhat.com>
parents: 2199
diff changeset
417 loop will set FRAME_VAR, a Lisp_Object, to each frame in
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
418 Vframe_list in succession and execute the statement. LIST_VAR
2252
9793d8654e23 * frame.h (FOR_EACH_FRAME): Change the definition so that
Jim Blandy <jimb@redhat.com>
parents: 2199
diff changeset
419 should be a Lisp_Object too; it is used to iterate through the
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
420 Vframe_list.
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
421
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
422 If MULTI_FRAME isn't defined, then this loop expands to something which
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
423 executes the statement once. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
424 #define FOR_EACH_FRAME(list_var, frame_var) \
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
425 for ((list_var) = Vframe_list; \
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
426 (CONSP (list_var) \
2252
9793d8654e23 * frame.h (FOR_EACH_FRAME): Change the definition so that
Jim Blandy <jimb@redhat.com>
parents: 2199
diff changeset
427 && (frame_var = XCONS (list_var)->car, 1)); \
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
428 list_var = XCONS (list_var)->cdr)
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
429
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
430
3649
e52308087b66 (Qicon): Declared.
Richard M. Stallman <rms@gnu.org>
parents: 3591
diff changeset
431 extern Lisp_Object Qframep, Qframe_live_p, Qicon;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
432
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
433 extern struct frame *selected_frame;
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
434 extern struct frame *last_nonminibuf_frame;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
435
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
436 extern struct frame *make_terminal_frame ();
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
437 extern struct frame *make_frame ();
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
438 extern struct frame *make_minibuffer_frame ();
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
439 extern struct frame *make_frame_without_minibuffer ();
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
440
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
441 extern Lisp_Object Vframe_list;
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
442 extern Lisp_Object Vdefault_frame_alist;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
443
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
444 extern Lisp_Object Vterminal_frame;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
445
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
446 #else /* not MULTI_FRAME */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
447
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
448 /* These definitions are used in a single-frame version of Emacs. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
449
984
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
450 /* A frame we use to store all the data concerning the screen when we
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
451 don't have multiple frames. Remember, if you store any data in it
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
452 which needs to be protected from GC, you should staticpro that
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
453 element explicitly. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
454 extern struct frame the_only_frame;
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
455
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
456 typedef struct frame *FRAME_PTR;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
457 #ifdef __GNUC__
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
458 /* A function call for always getting 0 is overkill, so... */
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
459 #define WINDOW_FRAME(w) ({ Lisp_Object tem; XSETFASTINT (tem, 0); tem; })
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
460 #else
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
461 #define WINDOW_FRAME(w) (Fselected_frame ())
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
462 #endif
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
463 #define XSETFRAME(p, v) (p = WINDOW_FRAME (***bogus***))
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
464 #define XFRAME(frame) (&the_only_frame)
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
465
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
466 extern FRAME_PTR selected_frame;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
467 extern FRAME_PTR last_nonminibuf_frame;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
468
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
469 #define FRAME_LIVE_P(f) 1
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
470 #ifdef MSDOS
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
471 /* The following definitions could also be used in the non-MSDOS case,
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
472 but the constants below lead to better code. */
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
473 #define FRAME_TERMCAP_P(f) (the_only_frame.output_method == output_termcap)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
474 #define FRAME_X_P(f) (the_only_frame.output_method != output_termcap)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
475 #else
979
268c7b5da35b *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 765
diff changeset
476 #define FRAME_TERMCAP_P(f) 1
268c7b5da35b *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 765
diff changeset
477 #define FRAME_X_P(f) 0
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
478 #endif
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
479 #define FRAME_WINDOW_P(f) FRAME_X_P (f)
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
480 #define FRAME_MINIBUF_ONLY_P(f) 0
979
268c7b5da35b *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 765
diff changeset
481 #define FRAME_HAS_MINIBUF_P(f) 1
984
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
482 #define FRAME_CURRENT_GLYPHS(f) (the_only_frame.current_glyphs)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
483 #define FRAME_DESIRED_GLYPHS(f) (the_only_frame.desired_glyphs)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
484 #define FRAME_TEMP_GLYPHS(f) (the_only_frame.temp_glyphs)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
485 #define FRAME_HEIGHT(f) (the_only_frame.height)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
486 #define FRAME_WIDTH(f) (the_only_frame.width)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
487 #define FRAME_NEW_HEIGHT(f) (the_only_frame.new_height)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
488 #define FRAME_NEW_WIDTH(f) (the_only_frame.new_width)
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
489 #define FRAME_MENU_BAR_LINES(f) (the_only_frame.menu_bar_lines)
984
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
490 #define FRAME_CURSOR_X(f) (the_only_frame.cursor_x)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
491 #define FRAME_CURSOR_Y(f) (the_only_frame.cursor_y)
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
492 #define FRAME_SET_VISIBLE(f,p) (p)
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
493 #define FRAME_VISIBLE_P(f) 1
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
494 #define SET_FRAME_GARBAGED(f) (frame_garbaged = 1)
984
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
495 #define FRAME_GARBAGED_P(f) (frame_garbaged)
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
496 #define FRAME_NO_SPLIT_P(f) 0
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
497 #define FRAME_WANTS_MODELINE_P(f) 1
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
498 #define FRAME_ICONIFIED_P(f) 0
10665
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
499 #define FRAME_WINDOW_SIZES_CHANGED(f) the_only_frame.window_sizes_changed
3518
2a9fb3c334ab (FRAME_MINIBUF_WINDOW): Use minibuffer_window.
Richard M. Stallman <rms@gnu.org>
parents: 2961
diff changeset
500 #define FRAME_MINIBUF_WINDOW(f) (minibuf_window)
998
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
501 #define FRAME_ROOT_WINDOW(f) (the_only_frame.root_window)
984
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
502 #define FRAME_SELECTED_WINDOW(f) (selected_window)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
503 #define SET_GLYPHS_FRAME(glyphs,frame) do ; while (0)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
504 #define FRAME_INSERT_COST(frame) (the_only_frame.insert_line_cost)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
505 #define FRAME_DELETE_COST(frame) (the_only_frame.delete_line_cost)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
506 #define FRAME_INSERTN_COST(frame) (the_only_frame.insert_n_lines_cost)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
507 #define FRAME_DELETEN_COST(frame) (the_only_frame.delete_n_lines_cost)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
508 #define FRAME_MESSAGE_BUF(f) (the_only_frame.message_buf)
4fda1fce3579 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 979
diff changeset
509 #define FRAME_SCROLL_BOTTOM_VPOS(f) (the_only_frame.scroll_bottom_vpos)
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
510 #define FRAME_FOCUS_FRAME(f) (Qnil)
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
511 #define FRAME_CAN_HAVE_SCROLL_BARS(f) (the_only_frame.can_have_scroll_bars)
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
512 #define FRAME_HAS_VERTICAL_SCROLL_BARS(f) \
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
513 (the_only_frame.has_vertical_scroll_bars)
8948
5f79babaa7d2 (FRAME_SCROLL_BAR_PIXEL_WIDTH): New macro, supersedes
Karl Heuer <kwzh@gnu.org>
parents: 8900
diff changeset
514 #define FRAME_SCROLL_BAR_PIXEL_WIDTH(f) (the_only_frame.scroll_bar_pixel_width)
5f79babaa7d2 (FRAME_SCROLL_BAR_PIXEL_WIDTH): New macro, supersedes
Karl Heuer <kwzh@gnu.org>
parents: 8900
diff changeset
515 #define FRAME_SCROLL_BAR_COLS(f) (the_only_frame.scroll_bar_cols)
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
516 #define FRAME_SCROLL_BARS(f) (the_only_frame.scroll_bars)
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
517 #define FRAME_CONDEMNED_SCROLL_BARS(f) (the_only_frame.condemned_scroll_bars)
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
518 #define FRAME_MENU_BAR_ITEMS(f) (the_only_frame.menu_bar_items)
10120
8b5ae8d2eefc (struct frame): New field cost_calculation_baud_rate.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
519 #define FRAME_COST_BAUD_RATE(f) (the_only_frame.cost_calculation_baud_rate)
357
1ad871406b12 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 261
diff changeset
520
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
521 /* See comments in definition above. */
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
522 #define FRAME_SAMPLE_VISIBILITY(f) (0)
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
523
979
268c7b5da35b *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 765
diff changeset
524 #define CHECK_FRAME(x, i) do; while (0)
268c7b5da35b *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 765
diff changeset
525 #define CHECK_LIVE_FRAME(x, y) do; while (0)
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
526
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
527 /* FOR_EACH_FRAME (LIST_VAR, FRAME_VAR) followed by a statement is a
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
528 `for' loop which iterates over the elements of Vframe_list. The
2252
9793d8654e23 * frame.h (FOR_EACH_FRAME): Change the definition so that
Jim Blandy <jimb@redhat.com>
parents: 2199
diff changeset
529 loop will set FRAME_VAR, a Lisp_Object, to each frame in
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
530 Vframe_list in succession and execute the statement. LIST_VAR
2252
9793d8654e23 * frame.h (FOR_EACH_FRAME): Change the definition so that
Jim Blandy <jimb@redhat.com>
parents: 2199
diff changeset
531 should be a Lisp_Object too; it is used to iterate through the
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
532 Vframe_list.
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
533
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
534 If MULTI_FRAME _is_ defined, then this loop expands to a real
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
535 `for' loop which traverses Vframe_list using LIST_VAR and
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
536 FRAME_VAR. */
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
537 #define FOR_EACH_FRAME(list_var, frame_var) \
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 9293
diff changeset
538 for (list_var = Qt; frame_var = WINDOW_FRAME (***bogus***), ! NILP (list_var); list_var = Qnil)
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
539
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
540 #endif /* not MULTI_FRAME */
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
541
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
542
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
543 /* Device- and MULTI_FRAME-independent scroll bar stuff. */
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
544
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
545 /* Return the starting column (zero-based) of the vertical scroll bar
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
546 for window W. The column before this one is the last column we can
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
547 use for text. If the window touches the right edge of the frame,
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
548 we have extra space allocated for it. Otherwise, the scroll bar
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
549 takes over the window's rightmost columns. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
550 #define WINDOW_VERTICAL_SCROLL_BAR_COLUMN(w) \
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
551 (((XINT ((w)->left) + XINT ((w)->width)) \
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
552 < FRAME_WIDTH (XFRAME (WINDOW_FRAME (w)))) \
8948
5f79babaa7d2 (FRAME_SCROLL_BAR_PIXEL_WIDTH): New macro, supersedes
Karl Heuer <kwzh@gnu.org>
parents: 8900
diff changeset
553 ? (XINT ((w)->left) + XINT ((w)->width) \
5f79babaa7d2 (FRAME_SCROLL_BAR_PIXEL_WIDTH): New macro, supersedes
Karl Heuer <kwzh@gnu.org>
parents: 8900
diff changeset
554 - FRAME_SCROLL_BAR_COLS (XFRAME (WINDOW_FRAME (w)))) \
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
555 : FRAME_WIDTH (XFRAME (WINDOW_FRAME (w))))
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
556
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
557 /* Return the height in lines of the vertical scroll bar in w. If the
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
558 window has a mode line, don't make the scroll bar extend that far. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
559 #define WINDOW_VERTICAL_SCROLL_BAR_HEIGHT(w) (window_internal_height (w))