|
428
|
1 /* Definitions of marked slots in frames
|
|
|
2 Copyright (C) 1988, 1992, 1993, 1994 Free Software Foundation, Inc.
|
|
|
3 Copyright (C) 1996 Ben Wing.
|
|
|
4
|
|
|
5 This file is part of XEmacs.
|
|
|
6
|
|
|
7 XEmacs is free software; you can redistribute it and/or modify it
|
|
|
8 under the terms of the GNU General Public License as published by the
|
|
|
9 Free Software Foundation; either version 2, or (at your option) any
|
|
|
10 later version.
|
|
|
11
|
|
|
12 XEmacs is distributed in the hope that it will be useful, but WITHOUT
|
|
|
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
|
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
|
15 for more details.
|
|
|
16
|
|
|
17 You should have received a copy of the GNU General Public License
|
|
|
18 along with XEmacs; see the file COPYING. If not, write to
|
|
|
19 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
20 Boston, MA 02111-1307, USA. */
|
|
|
21
|
|
|
22 /* Synched up with: FSF 19.30. Split out of frame.h. */
|
|
|
23
|
|
617
|
24 /* We define the Lisp_Objects in the frame structure in a separate file
|
|
|
25 because there are numerous places we want to iterate over them, such
|
|
|
26 as when defining them in the structure, initializing them, or marking
|
|
|
27 them.
|
|
|
28
|
|
|
29 To use, define MARKED_SLOT before including this file. In the structure
|
|
|
30 definition, you also need to define FRAME_SLOT_DECLARATION. No need to
|
|
|
31 undefine either value; that happens automatically. */
|
|
|
32
|
|
428
|
33 #ifdef FRAME_SLOT_DECLARATION
|
|
|
34 #define MARKED_SLOT_ARRAY(slot, size) MARKED_SLOT(slot[size])
|
|
|
35 #else
|
|
|
36 #define MARKED_SLOT_ARRAY(slot, size) do { \
|
|
|
37 int mslotidx; \
|
|
|
38 for (mslotidx = 0; mslotidx < size; mslotidx++) \
|
|
|
39 { \
|
|
|
40 MARKED_SLOT (slot[mslotidx]); \
|
|
|
41 } \
|
|
|
42 } while (0);
|
|
|
43 #endif
|
|
|
44
|
|
|
45 /* device frame belongs to. */
|
|
|
46 MARKED_SLOT (device);
|
|
|
47
|
|
|
48 /* Name of this frame: a Lisp string.
|
|
|
49 NOT the same as the frame's title, even though FSF bogusly
|
|
|
50 confuses the two. The frame's name is used for resourcing
|
|
|
51 and lookup purposes and is something you can count on having
|
|
|
52 a specific value, while the frame's title may vary depending
|
|
|
53 on the user's choice of `frame-title-format'. */
|
|
|
54 MARKED_SLOT (name);
|
|
|
55
|
|
|
56 /* The frame which should receive keystrokes that occur in this
|
|
|
57 frame, or nil if they should go to the frame itself. This is
|
|
|
58 usually nil, but if the frame is minibufferless, we can use this
|
|
|
59 to redirect keystrokes to a surrogate minibuffer frame when
|
|
|
60 needed.
|
|
|
61
|
|
|
62 Note that a value of nil is different than having the field point
|
|
|
63 to the frame itself. Whenever the Fselect_frame function is used
|
|
|
64 to shift from one frame to the other, any redirections to the
|
|
|
65 original frame are shifted to the newly selected frame; if
|
|
|
66 focus_frame is nil, Fselect_frame will leave it alone. */
|
|
|
67 MARKED_SLOT (focus_frame);
|
|
|
68
|
|
|
69 /* This frame's root window. Every frame has one.
|
|
|
70 If the frame has only a minibuffer window, this is it.
|
|
|
71 Otherwise, if the frame has a minibuffer window, this is its sibling. */
|
|
|
72 MARKED_SLOT (root_window);
|
|
|
73
|
|
|
74 /* This frame's selected window.
|
|
|
75 Each frame has its own window hierarchy
|
|
|
76 and one of the windows in it is selected within the frame.
|
|
|
77 The selected window of the selected frame is Emacs's selected window. */
|
|
|
78 MARKED_SLOT (selected_window);
|
|
|
79
|
|
|
80 /* This frame's minibuffer window.
|
|
|
81 Most frames have their own minibuffer windows,
|
|
|
82 but only the selected frame's minibuffer window
|
|
|
83 can actually appear to exist. */
|
|
|
84 MARKED_SLOT (minibuffer_window);
|
|
|
85
|
|
|
86 /* The most recently selected nonminibuf window.
|
|
|
87 This is used by things like the toolbar code, which doesn't
|
|
|
88 want the toolbar to change when moving to the minibuffer.
|
|
|
89 This will only be a minibuf window if we are a minibuf-only
|
|
|
90 frame. */
|
|
|
91 MARKED_SLOT (last_nonminibuf_window);
|
|
|
92
|
|
617
|
93 /* This frame's root window mirror. This structure exactly mirrors
|
|
|
94 the frame's window structure but contains only pointers to the
|
|
|
95 display structures. */
|
|
|
96 MARKED_SLOT (root_mirror);
|
|
|
97
|
|
428
|
98 /* frame property list */
|
|
|
99 MARKED_SLOT (plist);
|
|
|
100
|
|
442
|
101 /* buffer_alist at last redisplay. */
|
|
|
102 MARKED_SLOT (old_buffer_alist);
|
|
|
103
|
|
428
|
104 /* A copy of the global Vbuffer_list, to maintain a per-frame buffer
|
|
|
105 ordering. The Vbuffer_list variable and the buffer_list slot of each
|
|
|
106 frame contain exactly the same data, just in different orders. */
|
|
|
107 MARKED_SLOT (buffer_alist);
|
|
|
108
|
|
|
109 /* Predicate for selecting buffers for other-buffer. */
|
|
|
110 MARKED_SLOT (buffer_predicate);
|
|
|
111
|
|
|
112 /* The current mouse pointer for the frame. This is set by calling
|
|
|
113 `set-frame-pointer'. */
|
|
|
114 MARKED_SLOT (pointer);
|
|
|
115
|
|
|
116 /* The current icon for the frame. */
|
|
|
117 MARKED_SLOT (icon);
|
|
|
118
|
|
|
119 #ifdef HAVE_MENUBARS
|
|
|
120 /* Vector representing the menubar currently displayed. See menubar-x.c. */
|
|
|
121 MARKED_SLOT (menubar_data);
|
|
|
122 #endif
|
|
|
123
|
|
|
124 /* specifier values cached in the struct frame: */
|
|
|
125
|
|
|
126 #ifdef HAVE_MENUBARS
|
|
|
127 MARKED_SLOT (menubar_visible_p);
|
|
|
128 #endif
|
|
|
129
|
|
|
130 #ifdef HAVE_SCROLLBARS
|
|
|
131 /* Width and height of the scrollbars. */
|
|
|
132 MARKED_SLOT (scrollbar_width);
|
|
|
133 MARKED_SLOT (scrollbar_height);
|
|
|
134 /* Whether the scrollbars are visible */
|
|
|
135 MARKED_SLOT (horizontal_scrollbar_visible_p);
|
|
|
136 MARKED_SLOT (vertical_scrollbar_visible_p);
|
|
|
137 /* Scrollbars location */
|
|
|
138 MARKED_SLOT (scrollbar_on_left_p);
|
|
|
139 MARKED_SLOT (scrollbar_on_top_p);
|
|
|
140 #endif
|
|
|
141
|
|
|
142 #ifdef HAVE_TOOLBARS
|
|
|
143 /* The following three don't really need to be cached except
|
|
|
144 that we need to know when they've changed. */
|
|
|
145 MARKED_SLOT (default_toolbar_width);
|
|
|
146 MARKED_SLOT (default_toolbar_height);
|
|
|
147 MARKED_SLOT (default_toolbar_visible_p);
|
|
|
148 MARKED_SLOT (default_toolbar_border_width);
|
|
744
|
149 MARKED_SLOT (toolbar_shadow_thickness);
|
|
428
|
150
|
|
|
151 /* List of toolbar buttons of current toolbars */
|
|
|
152 MARKED_SLOT_ARRAY (toolbar_buttons, 4);
|
|
|
153 /* Size of the toolbars. The frame-local toolbar space is
|
|
|
154 subtracted before the windows are arranged. Window and buffer
|
|
|
155 local toolbars overlay their windows. */
|
|
|
156 MARKED_SLOT_ARRAY (toolbar_size, 4);
|
|
|
157 /* Visibility of the toolbars. This acts as a valve for toolbar_size. */
|
|
|
158 MARKED_SLOT_ARRAY (toolbar_visible_p, 4);
|
|
|
159 /* Thickness of the border around the toolbar. */
|
|
|
160 MARKED_SLOT_ARRAY (toolbar_border_width, 4);
|
|
|
161 #endif
|
|
|
162
|
|
442
|
163 /* Cache of subwindow instances for this frame */
|
|
|
164 MARKED_SLOT (subwindow_instance_cache);
|
|
|
165
|
|
428
|
166 /* Possible frame-local default for outside margin widths. */
|
|
|
167 MARKED_SLOT (left_margin_width);
|
|
|
168 MARKED_SLOT (right_margin_width);
|
|
|
169
|
|
|
170 #undef MARKED_SLOT
|
|
|
171 #undef MARKED_SLOT_ARRAY
|
|
|
172 #undef FRAME_SLOT_DECLARATION
|
