annotate src/frame.h @ 84033:52ef29977fe9

Move to ../doc/lispref
author Glenn Morris <rgm@gnu.org>
date Thu, 06 Sep 2007 04:14:59 +0000
parents ddf7869d045b
children 46029aa75461
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.
64770
a0d1312ede66 Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 64477
diff changeset
2 Copyright (C) 1993, 1994, 1999, 2000, 2001, 2002, 2003, 2004,
75348
3d45362f1d38 Add 2007 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 74965
diff changeset
3 2005, 2006, 2007 Free Software Foundation, Inc.
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
4
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5 This file is part of GNU Emacs.
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
6
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
7 GNU Emacs is free software; you can redistribute it and/or modify
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
8 it under the terms of the GNU General Public License as published by
78260
922696f363b0 Switch license to GPLv3 or later.
Glenn Morris <rgm@gnu.org>
parents: 75348
diff changeset
9 the Free Software Foundation; either version 3, or (at your option)
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
10 any later version.
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
11
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
12 GNU Emacs is distributed in the hope that it will be useful,
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
15 GNU General Public License for more details.
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
16
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
18 along with GNU Emacs; see the file COPYING. If not, write to
64084
a8fa7c632ee4 Update FSF's address.
Lute Kamstra <lute@gnu.org>
parents: 59203
diff changeset
19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
a8fa7c632ee4 Update FSF's address.
Lute Kamstra <lute@gnu.org>
parents: 59203
diff changeset
20 Boston, MA 02110-1301, USA. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
21
35802
1416f2329eb2 (EMACS_FRAME_H_INCLUDED): Use an include blocker
Gerd Moellmann <gerd@gnu.org>
parents: 35799
diff changeset
22 /* Don't multiply include: dispextern.h includes macterm.h which
1416f2329eb2 (EMACS_FRAME_H_INCLUDED): Use an include blocker
Gerd Moellmann <gerd@gnu.org>
parents: 35799
diff changeset
23 includes frame.h some emacs source includes both dispextern.h and
1416f2329eb2 (EMACS_FRAME_H_INCLUDED): Use an include blocker
Gerd Moellmann <gerd@gnu.org>
parents: 35799
diff changeset
24 frame.h */
1416f2329eb2 (EMACS_FRAME_H_INCLUDED): Use an include blocker
Gerd Moellmann <gerd@gnu.org>
parents: 35799
diff changeset
25
35803
888df8063774 Change the include blocker to the same form as in other header
Gerd Moellmann <gerd@gnu.org>
parents: 35802
diff changeset
26 #ifndef EMACS_FRAME_H
888df8063774 Change the include blocker to the same form as in other header
Gerd Moellmann <gerd@gnu.org>
parents: 35802
diff changeset
27 #define EMACS_FRAME_H
35799
74655128ce2d Update copyright.
Gerd Moellmann <gerd@gnu.org>
parents: 35798
diff changeset
28
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
29
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
30 /* Miscellanea. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
31
53229
33c3c7c16e13 lib-src/emacsclient.c: Implemented --here option (open a new Emacs tty). Needs more work.
Karoly Lorentey <lorentey@elte.hu>
parents: 53226
diff changeset
32 /* Nonzero means there is at least one garbaged frame. */
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
33 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
34
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
35 /* 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
36 print. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
37
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
38 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
39
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
40
16051
ccf489f8596e Removed support for !MULTI_FRAME.
Karl Heuer <kwzh@gnu.org>
parents: 15390
diff changeset
41 /* The structure representing a frame. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
42
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
43 enum output_method
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
44 {
83008
040dd41ed7d0 Hookified termcap devices, added bootstrap display device, plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 83004
diff changeset
45 output_initial,
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
46 output_termcap,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
47 output_x_window,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
48 output_msdos_raw,
25524
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
49 output_w32,
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
50 output_mac
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
51 };
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
52
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
53 enum vertical_scroll_bar_type
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
54 {
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
55 vertical_scroll_bar_none,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
56 vertical_scroll_bar_left,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
57 vertical_scroll_bar_right
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
58 };
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
59
47133
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
60 enum text_cursor_kinds
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
61 {
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
62 DEFAULT_CURSOR = -2,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
63 NO_CURSOR = -1,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
64 FILLED_BOX_CURSOR,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
65 HOLLOW_BOX_CURSOR,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
66 BAR_CURSOR,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
67 HBAR_CURSOR
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
68 };
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
69
82989
f3845715a5f6 Separate frame-local, tty-dependent parameters from tty-local parameters.
Karoly Lorentey <lorentey@elte.hu>
parents: 53232
diff changeset
70 #define FRAME_FOREGROUND_PIXEL(f) ((f)->foreground_pixel)
f3845715a5f6 Separate frame-local, tty-dependent parameters from tty-local parameters.
Karoly Lorentey <lorentey@elte.hu>
parents: 53232
diff changeset
71 #define FRAME_BACKGROUND_PIXEL(f) ((f)->background_pixel)
26781
4982f642dfdc (PIX_TYPE) [! HAVE_X_WINDOWS]: Define PIX_TYPE.
Dave Love <fx@gnu.org>
parents: 26729
diff changeset
72
83431
76396de7f50a Rename `struct device' to `struct terminal'. Rename some terminal-related functions similarly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83427
diff changeset
73 struct terminal;
26729
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
74
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
75 struct frame
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
76 {
8826
9f5965fe4f6b (struct frame, selected_frame, last_nonminibuf_frame): Use EMACS_INT.
Richard M. Stallman <rms@gnu.org>
parents: 8233
diff changeset
77 EMACS_INT size;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
78 struct Lisp_Vector *next;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
79
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
80 /* All Lisp_Object components must come first.
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
81 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
82 That ensures they are all aligned normally. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
83
14215
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
84 /* 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
85 as well as for the title in some cases. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
86 Lisp_Object name;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
87
12274
f3383ea95b06 (struct frame): New field icon_name.
Richard M. Stallman <rms@gnu.org>
parents: 11493
diff changeset
88 /* 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
89 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
90 Lisp_Object icon_name;
f3383ea95b06 (struct frame): New field icon_name.
Richard M. Stallman <rms@gnu.org>
parents: 11493
diff changeset
91
14215
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
92 /* 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
93 Usually it is nil. */
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
94 Lisp_Object title;
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
95
3591
507f64624555 Apply typo patches from Paul Eggert.
Jim Blandy <jimb@redhat.com>
parents: 3518
diff changeset
96 /* 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
97 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
98 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
99 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
100 needed.
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
101
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
102 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
103 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
104 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
105 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
106 focus_frame is nil, Fselect_frame will leave it alone. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
107 Lisp_Object focus_frame;
357
1ad871406b12 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 261
diff changeset
108
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
109 /* This frame's root window. Every frame has one.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
110 If the frame has only a minibuffer window, this is it.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
111 Otherwise, if the frame has a minibuffer window, this is its sibling. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
112 Lisp_Object root_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
113
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
114 /* This frame's selected window.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
115 Each frame has its own window hierarchy
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
116 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
117 The selected window of the selected frame is Emacs's selected window. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
118 Lisp_Object selected_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
119
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
120 /* This frame's minibuffer window.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
121 Most frames have their own minibuffer windows,
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
122 but only the selected frame's minibuffer window
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
123 can actually appear to exist. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
124 Lisp_Object minibuffer_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
125
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
126 /* Parameter alist of this frame.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
127 These are the parameters specified when creating the frame
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
128 or modified with modify-frame-parameters. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
129 Lisp_Object param_alist;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
130
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
131 /* 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
132 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
133 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
134 This field is marked by the garbage collector. It is here
83342
9216636c02fc Rename `struct display' to `struct device'. Update function, parameter and variable names accordingly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83332
diff changeset
135 instead of in the `device' structure so that the garbage
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
136 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
137 structure. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
138 Lisp_Object scroll_bars;
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
139 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
140
15098
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
141 /* Vector describing the items to display in the menu bar.
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
142 Each item has four elements in this vector.
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
143 They are KEY, STRING, SUBMAP, and HPOS.
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
144 (HPOS is not used in when the X toolkit is in use.)
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
145 There are four additional elements of nil at the end, to terminate. */
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
146 Lisp_Object menu_bar_items;
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
147
2396
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
148 /* 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
149 Lisp_Object face_alist;
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
150
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
151 /* 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
152 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
153 Only the X toolkit version uses this. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
154 Lisp_Object menu_bar_vector;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
155 /* 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
156 EMACS_INT menu_bar_items_used;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
157
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
158 /* Predicate for selecting buffers for other-buffer. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
159 Lisp_Object buffer_predicate;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
160
17222
60053e19d485 (struct frame): New field buffer_list.
Richard M. Stallman <rms@gnu.org>
parents: 17033
diff changeset
161 /* List of buffers viewed in this frame, for other-buffer. */
60053e19d485 (struct frame): New field buffer_list.
Richard M. Stallman <rms@gnu.org>
parents: 17033
diff changeset
162 Lisp_Object buffer_list;
60053e19d485 (struct frame): New field buffer_list.
Richard M. Stallman <rms@gnu.org>
parents: 17033
diff changeset
163
83415
d2c799f58129 Implement full support for frame-local `next-buffer' and `previous-buffer'.
Karoly Lorentey <lorentey@elte.hu>
parents: 83364
diff changeset
164 /* List of buffers that were viewed, then buried in this frame. The
d2c799f58129 Implement full support for frame-local `next-buffer' and `previous-buffer'.
Karoly Lorentey <lorentey@elte.hu>
parents: 83364
diff changeset
165 most recently buried buffer is first. For last-buffer. */
d2c799f58129 Implement full support for frame-local `next-buffer' and `previous-buffer'.
Karoly Lorentey <lorentey@elte.hu>
parents: 83364
diff changeset
166 Lisp_Object buried_buffer_list;
d2c799f58129 Implement full support for frame-local `next-buffer' and `previous-buffer'.
Karoly Lorentey <lorentey@elte.hu>
parents: 83364
diff changeset
167
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
168 /* A dummy window used to display menu bars under X when no X
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
169 toolkit support is available. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
170 Lisp_Object menu_bar_window;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
171
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
172 /* A window used to display the tool-bar of a frame. */
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
173 Lisp_Object tool_bar_window;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
174
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
175 /* Desired and current tool-bar items. */
33759
593bc303c500 (struct frame): Members desired_tool_bar_items,
Gerd Moellmann <gerd@gnu.org>
parents: 32752
diff changeset
176 Lisp_Object tool_bar_items;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
177
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
178 /* Desired and current contents displayed in tool_bar_window. */
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
179 Lisp_Object desired_tool_bar_string, current_tool_bar_string;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
180
17222
60053e19d485 (struct frame): New field buffer_list.
Richard M. Stallman <rms@gnu.org>
parents: 17033
diff changeset
181 /* beyond here, there should be no more Lisp_Object components. */
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
182
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
183 /* Cache of realized faces. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
184 struct face_cache *face_cache;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
185
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
186 /* A buffer to hold the frame's name. We can't use the Lisp
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
187 string's pointer (`name', above) because it might get relocated. */
11493
7a15a07093c2 (struct frame): New member namebuf.
Karl Heuer <kwzh@gnu.org>
parents: 11351
diff changeset
188 char *namebuf;
7a15a07093c2 (struct frame): New member namebuf.
Karl Heuer <kwzh@gnu.org>
parents: 11351
diff changeset
189
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
190 /* Glyph pool and matrix. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
191 struct glyph_pool *current_pool;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
192 struct glyph_pool *desired_pool;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
193 struct glyph_matrix *desired_matrix;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
194 struct glyph_matrix *current_matrix;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
195
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
196 /* 1 means that glyphs on this frame have been initialized so it can
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
197 be used for output. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
198 unsigned glyphs_initialized_p : 1;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
199
81406
217675ce2532 (struct frame) [MAC_OS]: New member external_tool_bar.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents: 75348
diff changeset
200 #if defined (USE_GTK) || defined (MAC_OS)
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
201 /* Nonzero means using a tool bar that comes from the toolkit. */
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
202 int external_tool_bar;
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
203 #endif
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
204
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
205 /* Margin at the top of the frame. Used to display the tool-bar. */
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
206 int tool_bar_lines;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
207
69241
d34c25a166bd (struct frame): New member n_tool_bar_rows.
Kim F. Storm <storm@cua.dk>
parents: 68651
diff changeset
208 int n_tool_bar_rows;
33759
593bc303c500 (struct frame): Members desired_tool_bar_items,
Gerd Moellmann <gerd@gnu.org>
parents: 32752
diff changeset
209 int n_tool_bar_items;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
210
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
211 /* A buffer for decode_mode_line. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
212 char *decode_mode_spec_buffer;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
213
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
214 /* 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
215 /* 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
216 int *insert_line_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
217 /* 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
218 int *delete_line_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
219 /* 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
220 int *insert_n_lines_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
221 /* 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
222 int *delete_n_lines_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
223
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
224 /* Size of this frame, excluding fringes, scroll bars etc.,
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
225 in units of canonical characters. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
226 EMACS_INT text_lines, text_cols;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
227
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
228 /* Total size of this frame (i.e. its native window), in units of
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
229 canonical characters. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
230 EMACS_INT total_lines, total_cols;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
231
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
232 /* New text height and width for pending size change.
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
233 0 if no change pending. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
234 int new_text_lines, new_text_cols;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
235
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
236 /* Pixel position of the frame window (x and y offsets in root window). */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
237 int left_pos, top_pos;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
238
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
239 /* Size of the frame window in pixels. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
240 int pixel_height, pixel_width;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
241
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
242 /* These many pixels are the difference between the outer window (i.e. the
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
243 left and top of the window manager decoration) and FRAME_X_WINDOW. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
244 int x_pixels_diff, y_pixels_diff;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
245
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
246 /* This is the gravity value for the specified window position. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
247 int win_gravity;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
248
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
249 /* The geometry flags for this window. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
250 int size_hint_flags;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
251
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
252 /* Border width of the frame window as known by the (X) window system. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
253 int border_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
254
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
255 /* Width of the internal border. This is a line of background color
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
256 just inside the window's border. When the frame is selected,
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
257 a highlighting is displayed inside the internal border. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
258 int internal_border_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
259
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
260 /* Canonical X unit. Width of default font, in pixels. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
261 int column_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
262
59203
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
263 /* Widht of space glyph of default font, in pixels. */
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
264 int space_width;
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
265
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
266 /* Canonical Y unit. Height of a line, in pixels. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
267 int line_height;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
268
83004
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
269 /* The output method says how the contents of this frame are
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
270 displayed. It could be using termcap, or using an X window.
83431
76396de7f50a Rename `struct device' to `struct terminal'. Rename some terminal-related functions similarly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83427
diff changeset
271 This must be the same as the terminal->type. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
272 enum output_method output_method;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
273
83431
76396de7f50a Rename `struct device' to `struct terminal'. Rename some terminal-related functions similarly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83427
diff changeset
274 /* The terminal device that this frame uses. If this is NULL, then
83342
9216636c02fc Rename `struct display' to `struct device'. Update function, parameter and variable names accordingly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83332
diff changeset
275 the frame has been deleted. */
83431
76396de7f50a Rename `struct device' to `struct terminal'. Rename some terminal-related functions similarly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83427
diff changeset
276 struct terminal *terminal;
83004
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
277
83342
9216636c02fc Rename `struct display' to `struct device'. Update function, parameter and variable names accordingly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83332
diff changeset
278 /* Device-dependent, frame-local auxiliary data used for displaying
83004
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
279 the contents. When the frame is deleted, this data is deleted as
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
280 well. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
281 union output_data
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
282 {
83004
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
283 struct tty_output *tty; /* termchar.h */
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
284 struct x_output *x; /* xterm.h */
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
285 struct w32_output *w32; /* w32term.h */
7900111db01c Converted display hooks to be display-local. Plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 82991
diff changeset
286 struct mac_output *mac; /* macterm.h */
31900
8b2fa657800d (struct frame): Make the `nothing' member of union
Gerd Moellmann <gerd@gnu.org>
parents: 31147
diff changeset
287 EMACS_INT nothing;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
288 }
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
289 output_data;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
290
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
291 /* Total width of fringes reserved for drawing truncation bitmaps,
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
292 continuation bitmaps and alike. The width is in canonical char
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
293 units of the frame. This must currently be the case because window
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
294 sizes aren't pixel values. If it weren't the case, we wouldn't be
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
295 able to split windows horizontally nicely. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
296 int fringe_cols;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
297
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
298 /* The extra width (in pixels) currently allotted for fringes. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
299 int left_fringe_width, right_fringe_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
300
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
301 /* See FULLSCREEN_ enum below */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
302 int want_fullscreen;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
303
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
304 /* 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
305 int menu_bar_lines;
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
306
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
307 #if defined (USE_X_TOOLKIT) || defined (HAVE_NTGUI) || defined (MAC_OS) \
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
308 || defined (USE_GTK)
5657
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
309 /* 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
310 int external_menu_bar;
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
311 #endif
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
312
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
313 /* Nonzero if last attempt at redisplay on this frame was preempted. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
314 char display_preempted;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
315
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
316 /* 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
317 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
318 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
319
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
320 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
321 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
322 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
323
53232
22aaf1e5fbe6 Full support for multiple terminal I/O (with some rough edges).
Karoly Lorentey <lorentey@elte.hu>
parents: 53229
diff changeset
324 On ttys and on Windows NT/9X, to avoid wasting effort updating
22aaf1e5fbe6 Full support for multiple terminal I/O (with some rough edges).
Karoly Lorentey <lorentey@elte.hu>
parents: 53229
diff changeset
325 visible frames that are actually completely obscured by other
22aaf1e5fbe6 Full support for multiple terminal I/O (with some rough edges).
Karoly Lorentey <lorentey@elte.hu>
parents: 53229
diff changeset
326 windows on the display, we bend the meaning of visible slightly:
22aaf1e5fbe6 Full support for multiple terminal I/O (with some rough edges).
Karoly Lorentey <lorentey@elte.hu>
parents: 53229
diff changeset
327 if greater than 1, then the frame is obscured - we still consider
22aaf1e5fbe6 Full support for multiple terminal I/O (with some rough edges).
Karoly Lorentey <lorentey@elte.hu>
parents: 53229
diff changeset
328 it to be "visible" as seen from lisp, but we don't bother
22aaf1e5fbe6 Full support for multiple terminal I/O (with some rough edges).
Karoly Lorentey <lorentey@elte.hu>
parents: 53229
diff changeset
329 updating it. We must take care to garbage the frame when it
22aaf1e5fbe6 Full support for multiple terminal I/O (with some rough edges).
Karoly Lorentey <lorentey@elte.hu>
parents: 53229
diff changeset
330 ceaces to be obscured though.
19696
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
331
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
332 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
333
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
334 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
335 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
336 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
337 at the next redisplay.
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
338
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
339 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
340 FRAME_SAMPLE_VISIBILITY.
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
341
6183
242d3fed9285 Fix typo in comment.
Karl Heuer <kwzh@gnu.org>
parents: 5657
diff changeset
342 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
343 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
344 char visible, iconified;
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
345
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
346 /* 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
347 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
348 See FRAME_SAMPLE_VISIBILITY, below. */
29439
b5e905b3b506 (struct frame): Use volatile unconditionally.
Dave Love <fx@gnu.org>
parents: 28691
diff changeset
349 volatile char async_visible, async_iconified;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
350
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
351 /* Nonzero if this frame should be redrawn. */
29439
b5e905b3b506 (struct frame): Use volatile unconditionally.
Dave Love <fx@gnu.org>
parents: 28691
diff changeset
352 volatile char garbaged;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
353
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
354 /* True if frame actually has a minibuffer window on it.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
355 0 if using a minibuffer window that isn't on this frame. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
356 char has_minibuffer;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
357
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
358 /* 0 means, if this frame has just one window,
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
359 show no modeline for that window. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
360 char wants_modeline;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
361
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
362 /* 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
363 support scroll bars. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
364 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
365
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
366 /* 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
367 actually display them on this frame. */
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
368 enum vertical_scroll_bar_type vertical_scroll_bar_type;
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
369
47133
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
370 /* What kind of text cursor should we draw in the future?
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
371 This should always be filled_box_cursor or bar_cursor. */
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
372 enum text_cursor_kinds desired_cursor;
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
373
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
374 /* Width of bar cursor (if we are using that). */
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
375 int cursor_width;
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
376
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
377 /* What kind of text cursor should we draw when the cursor blinks off?
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
378 This can be filled_box_cursor or bar_cursor or no_cursor. */
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
379 enum text_cursor_kinds blink_off_cursor;
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
380
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
381 /* Width of bar cursor (if we are using that) for blink-off state. */
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
382 int blink_off_cursor_width;
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
383
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
384 /* 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
385 char auto_raise;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
386
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
387 /* 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
388 char auto_lower;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
389
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
390 /* True if frame's root window can't be split. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
391 char no_split;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
392
998
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
393 /* 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
394 the current buffer, etcetera. If the user explicitly sets the frame
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
395 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
396 cleared. */
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
397 char explicit_name;
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
398
10665
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
399 /* 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
400 char window_sizes_changed;
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
401
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
402 /* Storage for messages to this frame. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
403 char *message_buf;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
404
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
405 /* Nonnegative if current redisplay should not do scroll computation
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
406 for lines beyond a certain vpos. This is the vpos. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
407 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
408
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
409 /* Configured width of the scroll bar, in pixels and in characters.
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
410 config_scroll_bar_cols tracks config_scroll_bar_width if the
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
411 latter is positive; a zero value in config_scroll_bar_width means
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
412 to compute the actual width on the fly, using config_scroll_bar_cols
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
413 and the current font width. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
414 int config_scroll_bar_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
415 int config_scroll_bar_cols;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
416
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
417 /* The size of the extra width currently allotted for vertical
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
418 scroll bars in this frame, in pixels. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
419 int scroll_bar_actual_width;
10120
8b5ae8d2eefc (struct frame): New field cost_calculation_baud_rate.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
420
8b5ae8d2eefc (struct frame): New field cost_calculation_baud_rate.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
421 /* 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
422 int cost_calculation_baud_rate;
12543
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
423
83342
9216636c02fc Rename `struct display' to `struct device'. Update function, parameter and variable names accordingly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83332
diff changeset
424 /* Nonzero if the mouse has moved on this display device
12543
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
425 since the last time we checked. */
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
426 char mouse_moved;
25527
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
427
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
428 /* Exponent for gamma correction of colors. 1/(VIEWING_GAMMA *
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
429 SCREEN_GAMMA) where viewing_gamma is 0.4545 and SCREEN_GAMMA is a
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
430 frame parameter. 0 means don't do gamma correction. */
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
431 double gamma;
28691
26fdeb2124f0 (struct frame): Add member extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents: 28651
diff changeset
432
26fdeb2124f0 (struct frame): Add member extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents: 28651
diff changeset
433 /* Additional space to put between text lines on this frame. */
26fdeb2124f0 (struct frame): Add member extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents: 28651
diff changeset
434 int extra_line_spacing;
40511
35857e7683d8 (struct frame) <resized_p>: New member.
Gerd Moellmann <gerd@gnu.org>
parents: 35803
diff changeset
435
35857e7683d8 (struct frame) <resized_p>: New member.
Gerd Moellmann <gerd@gnu.org>
parents: 35803
diff changeset
436 /* Set to non-zero in change_frame_size when size of frame changed
35857e7683d8 (struct frame) <resized_p>: New member.
Gerd Moellmann <gerd@gnu.org>
parents: 35803
diff changeset
437 Clear the frame in clear_garbaged_frames if set. */
35857e7683d8 (struct frame) <resized_p>: New member.
Gerd Moellmann <gerd@gnu.org>
parents: 35803
diff changeset
438 unsigned resized_p : 1;
51665
c1f65dfc56eb Fix some of the font/face problems.
Jan Djärv <jan.h.d@swipnet.se>
parents: 51195
diff changeset
439
53883
8454bbf234cb (struct frame): New member force_flush_display_p.
Kim F. Storm <storm@cua.dk>
parents: 53177
diff changeset
440 /* Set to non-zero in when we want for force a flush_display in
8454bbf234cb (struct frame): New member force_flush_display_p.
Kim F. Storm <storm@cua.dk>
parents: 53177
diff changeset
441 update_frame, usually after resizing the frame. */
8454bbf234cb (struct frame): New member force_flush_display_p.
Kim F. Storm <storm@cua.dk>
parents: 53177
diff changeset
442 unsigned force_flush_display_p : 1;
83037
03a73693678e Merged in changes from CVS HEAD
Karoly Lorentey <lorentey@elte.hu>
parents: 83016 53883
diff changeset
443
82989
f3845715a5f6 Separate frame-local, tty-dependent parameters from tty-local parameters.
Karoly Lorentey <lorentey@elte.hu>
parents: 53232
diff changeset
444 /* All display backends seem to need these two pixel values. */
f3845715a5f6 Separate frame-local, tty-dependent parameters from tty-local parameters.
Karoly Lorentey <lorentey@elte.hu>
parents: 53232
diff changeset
445 unsigned long background_pixel;
f3845715a5f6 Separate frame-local, tty-dependent parameters from tty-local parameters.
Karoly Lorentey <lorentey@elte.hu>
parents: 53232
diff changeset
446 unsigned long foreground_pixel;
f3845715a5f6 Separate frame-local, tty-dependent parameters from tty-local parameters.
Karoly Lorentey <lorentey@elte.hu>
parents: 53232
diff changeset
447
51665
c1f65dfc56eb Fix some of the font/face problems.
Jan Djärv <jan.h.d@swipnet.se>
parents: 51195
diff changeset
448 /* Set to non-zero if the default face for the frame has been
c1f65dfc56eb Fix some of the font/face problems.
Jan Djärv <jan.h.d@swipnet.se>
parents: 51195
diff changeset
449 realized. Reset to zero whenever the default face changes.
c1f65dfc56eb Fix some of the font/face problems.
Jan Djärv <jan.h.d@swipnet.se>
parents: 51195
diff changeset
450 Used to see the difference between a font change and face change. */
c1f65dfc56eb Fix some of the font/face problems.
Jan Djärv <jan.h.d@swipnet.se>
parents: 51195
diff changeset
451 unsigned default_face_done_p : 1;
64477
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
452
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
453 /* Set to non-zero if this frame has already been hscrolled during
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
454 current redisplay. */
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
455 unsigned already_hscrolled_p : 1;
65373
efc66a29d707 (struct frame): New member updated_p.
Kim F. Storm <storm@cua.dk>
parents: 64770
diff changeset
456
efc66a29d707 (struct frame): New member updated_p.
Kim F. Storm <storm@cua.dk>
parents: 64770
diff changeset
457 /* Set to non-zero when current redisplay has updated frame. */
efc66a29d707 (struct frame): New member updated_p.
Kim F. Storm <storm@cua.dk>
parents: 64770
diff changeset
458 unsigned updated_p : 1;
74965
5a5bdcf2b324 (struct frame): New member minimize_tool_bar_window_p.
Kim F. Storm <storm@cua.dk>
parents: 74496
diff changeset
459
5a5bdcf2b324 (struct frame): New member minimize_tool_bar_window_p.
Kim F. Storm <storm@cua.dk>
parents: 74496
diff changeset
460 /* Set to non-zero to minimize tool-bar height even when
5a5bdcf2b324 (struct frame): New member minimize_tool_bar_window_p.
Kim F. Storm <storm@cua.dk>
parents: 74496
diff changeset
461 auto-resize-tool-bar is set to grow-only. */
5a5bdcf2b324 (struct frame): New member minimize_tool_bar_window_p.
Kim F. Storm <storm@cua.dk>
parents: 74496
diff changeset
462 unsigned minimize_tool_bar_window_p : 1;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
463 };
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
464
16051
ccf489f8596e Removed support for !MULTI_FRAME.
Karl Heuer <kwzh@gnu.org>
parents: 15390
diff changeset
465 #ifdef MULTI_KBOARD
83431
76396de7f50a Rename `struct device' to `struct terminal'. Rename some terminal-related functions similarly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83427
diff changeset
466 #define FRAME_KBOARD(f) ((f)->terminal->kboard)
11005
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
467 #else
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
468 #define FRAME_KBOARD(f) (&the_only_kboard)
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
469 #endif
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
470
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
471 typedef struct frame *FRAME_PTR;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
472
28417
4b675266db04 * lisp.h (XCONS, XSTRING, XSYMBOL, XFLOAT, XPROCESS, XWINDOW, XSUBR, XBUFFER):
Ken Raeburn <raeburn@raeburn.org>
parents: 28226
diff changeset
473 #define XFRAME(p) (eassert (GC_FRAMEP(p)),(struct frame *) XPNTR (p))
10288
e4a6f55757a9 (XSETFRAME): Use pseudovector.
Richard M. Stallman <rms@gnu.org>
parents: 10208
diff changeset
474 #define XSETFRAME(a, b) (XSETPSEUDOVECTOR (a, b, PVEC_FRAME))
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
475
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
476 /* Given a window, return its frame as a Lisp_Object. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
477 #define WINDOW_FRAME(w) (w)->frame
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
478
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
479 /* Test a frame for particular kinds of display methods. */
83008
040dd41ed7d0 Hookified termcap devices, added bootstrap display device, plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 83004
diff changeset
480 #define FRAME_INITIAL_P(f) ((f)->output_method == output_initial)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
481 #define FRAME_TERMCAP_P(f) ((f)->output_method == output_termcap)
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
482 #define FRAME_X_P(f) ((f)->output_method == output_x_window)
16588
481b7874a1e9 Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16429
diff changeset
483 #define FRAME_W32_P(f) ((f)->output_method == output_w32)
15390
d01198d2bc40 (FRAME_MSDOS_P): A new macro for MSDOS frames.
Richard M. Stallman <rms@gnu.org>
parents: 15098
diff changeset
484 #define FRAME_MSDOS_P(f) ((f)->output_method == output_msdos_raw)
25524
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
485 #define FRAME_MAC_P(f) ((f)->output_method == output_mac)
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
486
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
487 /* 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
488 defined to be the predicate for the window system being used. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
489
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
490 #ifdef HAVE_X_WINDOWS
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
491 #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
492 #endif
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
493 #ifdef HAVE_NTGUI
16588
481b7874a1e9 Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16429
diff changeset
494 #define FRAME_WINDOW_P(f) FRAME_W32_P (f)
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
495 #endif
44890
01b93e5e53a7 Patch for building Emacs on Mac OS X. April 26, 2002. See ChangeLog,
Andrew Choi <akochoi@shaw.ca>
parents: 43367
diff changeset
496 #ifdef MAC_OS
25524
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
497 #define FRAME_WINDOW_P(f) FRAME_MAC_P (f)
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
498 #endif
13568
01ec2620dd87 (FRAME_WINDOW_P): Always define it one way or another.
Richard M. Stallman <rms@gnu.org>
parents: 13411
diff changeset
499 #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
500 #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
501 #endif
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
502
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
503 /* Nonzero if frame F is still alive (not deleted). */
83431
76396de7f50a Rename `struct device' to `struct terminal'. Rename some terminal-related functions similarly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83427
diff changeset
504 #define FRAME_LIVE_P(f) ((f)->terminal != 0)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
505
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
506 /* Nonzero if frame F is a minibuffer-only frame. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
507 #define FRAME_MINIBUF_ONLY_P(f) \
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
508 EQ (FRAME_ROOT_WINDOW (f), FRAME_MINIBUF_WINDOW (f))
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
509
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
510 /* Nonzero if frame F contains a minibuffer window.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
511 (If this is 0, F must use some other minibuffer window.) */
979
268c7b5da35b *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 765
diff changeset
512 #define FRAME_HAS_MINIBUF_P(f) ((f)->has_minibuffer)
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
513
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
514 /* Pixel height of frame F, including non-toolkit menu bar and
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
515 non-toolkit tool bar lines. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
516 #define FRAME_PIXEL_HEIGHT(f) ((f)->pixel_height)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
517
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
518 /* Pixel width of frame F. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
519 #define FRAME_PIXEL_WIDTH(f) ((f)->pixel_width)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
520
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
521 /* Height of frame F, measured in canonical lines, including
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
522 non-toolkit menu bar and non-toolkit tool bar lines. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
523 #define FRAME_LINES(f) (f)->text_lines
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
524
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
525 /* Width of frame F, measured in canonical character columns,
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
526 not including scroll bars if any. */
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
527 #define FRAME_COLS(f) (f)->text_cols
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
528
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
529 /* Number of lines of frame F used for menu bar.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
530 This is relevant on terminal frames and on
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
531 X Windows when not using the X toolkit.
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
532 These lines are counted in FRAME_LINES. */
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
533 #define FRAME_MENU_BAR_LINES(f) (f)->menu_bar_lines
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
534
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
535 /* Nonzero if this frame should display a tool bar
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
536 in a way that does not use any text lines. */
81406
217675ce2532 (struct frame) [MAC_OS]: New member external_tool_bar.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents: 75348
diff changeset
537 #if defined (USE_GTK) || defined (MAC_OS)
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
538 #define FRAME_EXTERNAL_TOOL_BAR(f) (f)->external_tool_bar
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
539 #else
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
540 #define FRAME_EXTERNAL_TOOL_BAR(f) 0
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
541 #endif
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
542
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
543 /* Number of lines of frame F used for the tool-bar. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
544
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
545 #define FRAME_TOOL_BAR_LINES(f) (f)->tool_bar_lines
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
546
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
547
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
548 /* Lines above the top-most window in frame F. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
549
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
550 #define FRAME_TOP_MARGIN(F) \
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
551 (FRAME_MENU_BAR_LINES (F) + FRAME_TOOL_BAR_LINES (F))
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
552
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
553 /* Nonzero if this frame should display a menu bar
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
554 in a way that does not use any text lines. */
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
555 #if defined (USE_X_TOOLKIT) || defined (HAVE_NTGUI) || defined (MAC_OS) \
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
556 || defined (USE_GTK)
5657
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
557 #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
558 #else
5b063488f2f8 (FRAME_EXTERNAL_MENU_BAR) [!USE_X_TOOLKIT]: Give zero.
Richard M. Stallman <rms@gnu.org>
parents: 7307
diff changeset
559 #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
560 #endif
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
561 #define FRAME_VISIBLE_P(f) ((f)->visible != 0)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
562
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
563 /* Nonzero if frame F is currently visible but hidden. */
19696
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
564 #define FRAME_OBSCURED_P(f) ((f)->visible > 1)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
565
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
566 /* Nonzero if frame F is currently iconified. */
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
567 #define FRAME_ICONIFIED_P(f) (f)->iconified
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
568
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
569 #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
570 ((f)->async_visible = (p), FRAME_SAMPLE_VISIBILITY (f))
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
571 #define SET_FRAME_GARBAGED(f) (frame_garbaged = 1, f->garbaged = 1)
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
572 #define FRAME_GARBAGED_P(f) (f)->garbaged
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
573
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
574 /* Nonzero means do not allow splitting this frame's window. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
575 #define FRAME_NO_SPLIT_P(f) (f)->no_split
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
576
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
577 /* Not really implemented. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
578 #define FRAME_WANTS_MODELINE_P(f) (f)->wants_modeline
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
579
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
580 /* Nonzero if a size change has been requested for frame F
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
581 but not yet really put into effect. This can be true temporarily
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
582 when an X event comes in at a bad time. */
10665
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
583 #define FRAME_WINDOW_SIZES_CHANGED(f) (f)->window_sizes_changed
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
584
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
585 /* The minibuffer window of frame F, if it has one; otherwise nil. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
586 #define FRAME_MINIBUF_WINDOW(f) (f)->minibuffer_window
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
587
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
588 /* The root window of the window tree of frame F. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
589 #define FRAME_ROOT_WINDOW(f) (f)->root_window
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
590
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
591 /* The currently selected window of the window tree of frame F. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
592 #define FRAME_SELECTED_WINDOW(f) (f)->selected_window
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
593
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
594 #define FRAME_INSERT_COST(f) (f)->insert_line_cost
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
595 #define FRAME_DELETE_COST(f) (f)->delete_line_cost
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
596 #define FRAME_INSERTN_COST(f) (f)->insert_n_lines_cost
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
597 #define FRAME_DELETEN_COST(f) (f)->delete_n_lines_cost
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
598 #define FRAME_MESSAGE_BUF(f) (f)->message_buf
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
599 #define FRAME_SCROLL_BOTTOM_VPOS(f) (f)->scroll_bottom_vpos
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
600 #define FRAME_FOCUS_FRAME(f) (f)->focus_frame
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
601
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
602 /* Nonzero if frame F supports scroll bars.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
603 If this is zero, then it is impossible to enable scroll bars
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
604 on frame F. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
605 #define FRAME_CAN_HAVE_SCROLL_BARS(f) ((f)->can_have_scroll_bars)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
606
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
607 /* This frame slot says whether scroll bars are currently enabled for frame F,
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
608 and which side they are on. */
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
609 #define FRAME_VERTICAL_SCROLL_BAR_TYPE(f) ((f)->vertical_scroll_bar_type)
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
610 #define FRAME_HAS_VERTICAL_SCROLL_BARS(f) \
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
611 ((f)->vertical_scroll_bar_type != vertical_scroll_bar_none)
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
612 #define FRAME_HAS_VERTICAL_SCROLL_BARS_ON_LEFT(f) \
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
613 ((f)->vertical_scroll_bar_type == vertical_scroll_bar_left)
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
614 #define FRAME_HAS_VERTICAL_SCROLL_BARS_ON_RIGHT(f) \
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
615 ((f)->vertical_scroll_bar_type == vertical_scroll_bar_right)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
616
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
617 /* Width that a scroll bar in frame F should have, if there is one.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
618 Measured in pixels.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
619 If scroll bars are turned off, this is still nonzero. */
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
620 #define FRAME_CONFIG_SCROLL_BAR_WIDTH(f) ((f)->config_scroll_bar_width)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
621
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
622 /* Width that a scroll bar in frame F should have, if there is one.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
623 Measured in columns (characters).
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
624 If scroll bars are turned off, this is still nonzero. */
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
625 #define FRAME_CONFIG_SCROLL_BAR_COLS(f) ((f)->config_scroll_bar_cols)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
626
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
627 /* Width of a scroll bar in frame F, measured in columns (characters),
35798
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
628 but only if scroll bars are on the left. If scroll bars are on
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
629 the right in this frame, or there are no scroll bars, value is 0. */
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
630
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
631 #define FRAME_LEFT_SCROLL_BAR_COLS(f) \
35798
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
632 (FRAME_HAS_VERTICAL_SCROLL_BARS_ON_LEFT (f) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
633 ? FRAME_CONFIG_SCROLL_BAR_COLS (f) \
35798
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
634 : 0)
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
635
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
636 /* Width of a left scroll bar in frame F, measured in pixels */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
637
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
638 #define FRAME_LEFT_SCROLL_BAR_AREA_WIDTH(f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
639 (FRAME_HAS_VERTICAL_SCROLL_BARS_ON_LEFT (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
640 ? (FRAME_CONFIG_SCROLL_BAR_COLS (f) * FRAME_COLUMN_WIDTH (f)) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
641 : 0)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
642
35798
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
643 /* Width of a scroll bar in frame F, measured in columns (characters),
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
644 but only if scroll bars are on the right. If scroll bars are on
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
645 the left in this frame, or there are no scroll bars, value is 0. */
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
646
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
647 #define FRAME_RIGHT_SCROLL_BAR_COLS(f) \
35798
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
648 (FRAME_HAS_VERTICAL_SCROLL_BARS_ON_RIGHT (f) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
649 ? FRAME_CONFIG_SCROLL_BAR_COLS (f) \
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
650 : 0)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
651
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
652 /* Width of a right scroll bar area in frame F, measured in pixels */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
653
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
654 #define FRAME_RIGHT_SCROLL_BAR_AREA_WIDTH(f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
655 (FRAME_HAS_VERTICAL_SCROLL_BARS_ON_RIGHT (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
656 ? (FRAME_CONFIG_SCROLL_BAR_COLS (f) * FRAME_COLUMN_WIDTH (f)) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
657 : 0)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
658
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
659 /* Actual width of a scroll bar in frame F, measured in columns. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
660
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
661 #define FRAME_SCROLL_BAR_COLS(f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
662 (FRAME_HAS_VERTICAL_SCROLL_BARS (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
663 ? FRAME_CONFIG_SCROLL_BAR_COLS (f) \
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
664 : 0)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
665
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
666 /* Actual width of a scroll bar area in frame F, measured in pixels. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
667
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
668 #define FRAME_SCROLL_BAR_AREA_WIDTH(f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
669 (FRAME_HAS_VERTICAL_SCROLL_BARS (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
670 ? (FRAME_CONFIG_SCROLL_BAR_COLS (f) * FRAME_COLUMN_WIDTH (f)) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
671 : 0)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
672
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
673 /* Total width of frame F, in columns (characters),
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
674 including the width used by scroll bars if any. */
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
675
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
676 #define FRAME_TOTAL_COLS(f) ((f)->total_cols)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
677
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
678 /* Set the width of frame F to VAL.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
679 VAL is the width of a full-frame window,
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
680 not including scroll bars and fringes. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
681
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
682 #define SET_FRAME_COLS(f, val) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
683 (FRAME_COLS (f) = (val), \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
684 (f)->total_cols = FRAME_TOTAL_COLS_ARG (f, FRAME_COLS (f)))
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
685
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
686 /* Given a value WIDTH for frame F's nominal width,
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
687 return the value that FRAME_TOTAL_COLS should have. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
688
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
689 #define FRAME_TOTAL_COLS_ARG(f, width) \
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
690 ((width) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
691 + FRAME_SCROLL_BAR_COLS (f) \
41121
2b74029038bd Fringe cleanup.
Kim F. Storm <storm@cua.dk>
parents: 40655
diff changeset
692 + FRAME_FRINGE_COLS (f))
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
693
21762
b2746acaa663 (FRAME_CURSOR_X_LIMIT): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 21425
diff changeset
694 /* Maximum + 1 legitimate value for FRAME_CURSOR_X. */
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
695
21762
b2746acaa663 (FRAME_CURSOR_X_LIMIT): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 21425
diff changeset
696 #define FRAME_CURSOR_X_LIMIT(f) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
697 (FRAME_COLS (f) + FRAME_LEFT_SCROLL_BAR_COLS (f))
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
698
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
699 /* Nonzero if frame F has scroll bars. */
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
700
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
701 #define FRAME_SCROLL_BARS(f) ((f)->scroll_bars)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
702
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
703 #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
704 #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
705 #define FRAME_COST_BAUD_RATE(f) ((f)->cost_calculation_baud_rate)
17033
ffd6878cae02 (struct frame): New member `fontset_data'.
Karl Heuer <kwzh@gnu.org>
parents: 16588
diff changeset
706
47133
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
707 #define FRAME_DESIRED_CURSOR(f) ((f)->desired_cursor)
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
708 #define FRAME_BLINK_OFF_CURSOR(f) ((f)->blink_off_cursor)
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
709 #define FRAME_CURSOR_WIDTH(f) ((f)->cursor_width)
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
710 #define FRAME_BLINK_OFF_CURSOR_WIDTH(f) ((f)->blink_off_cursor_width)
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
711
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
712 /* Return a pointer to the face cache of frame F. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
713
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
714 #define FRAME_FACE_CACHE(F) (F)->face_cache
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
715
17033
ffd6878cae02 (struct frame): New member `fontset_data'.
Karl Heuer <kwzh@gnu.org>
parents: 16588
diff changeset
716 /* Return the size of message_buf of the frame F. We multiply the
ffd6878cae02 (struct frame): New member `fontset_data'.
Karl Heuer <kwzh@gnu.org>
parents: 16588
diff changeset
717 width of the frame by 4 because multi-byte form may require at most
ffd6878cae02 (struct frame): New member `fontset_data'.
Karl Heuer <kwzh@gnu.org>
parents: 16588
diff changeset
718 4-byte for a character. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
719
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
720 #define FRAME_MESSAGE_BUF_SIZE(f) (((int) FRAME_COLS (f)) * 4)
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
721
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
722 /* 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
723 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
724 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
725 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
726 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
727 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
728 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
729
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
730 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
731 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
732
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
733 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
734 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
735 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
736 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
737 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
738 counterparts.
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
739
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
740 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
741
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
742 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
743 it must be marked as garbaged, since redisplay hasn't been keeping
53229
33c3c7c16e13 lib-src/emacsclient.c: Implemented --here option (open a new Emacs tty). Needs more work.
Karoly Lorentey <lorentey@elte.hu>
parents: 53226
diff changeset
744 up its contents.
33c3c7c16e13 lib-src/emacsclient.c: Implemented --here option (open a new Emacs tty). Needs more work.
Karoly Lorentey <lorentey@elte.hu>
parents: 53226
diff changeset
745
33c3c7c16e13 lib-src/emacsclient.c: Implemented --here option (open a new Emacs tty). Needs more work.
Karoly Lorentey <lorentey@elte.hu>
parents: 53226
diff changeset
746 Note that a tty frame is visible if and only if it is the topmost
33c3c7c16e13 lib-src/emacsclient.c: Implemented --here option (open a new Emacs tty). Needs more work.
Karoly Lorentey <lorentey@elte.hu>
parents: 53226
diff changeset
747 frame. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
748
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
749 #define FRAME_SAMPLE_VISIBILITY(f) \
19696
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
750 (((f)->async_visible && (f)->visible != (f)->async_visible) ? \
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
751 SET_FRAME_GARBAGED (f) : 0, \
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
752 (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
753 (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
754
71823
6b4b6ba02f17 (CHECK_FRAME, CHECK_LIVE_FRAME): Use CHECK_TYPE.
Kim F. Storm <storm@cua.dk>
parents: 69241
diff changeset
755 #define CHECK_FRAME(x) \
6b4b6ba02f17 (CHECK_FRAME, CHECK_LIVE_FRAME): Use CHECK_TYPE.
Kim F. Storm <storm@cua.dk>
parents: 69241
diff changeset
756 CHECK_TYPE (FRAMEP (x), Qframep, x)
485
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
757
71823
6b4b6ba02f17 (CHECK_FRAME, CHECK_LIVE_FRAME): Use CHECK_TYPE.
Kim F. Storm <storm@cua.dk>
parents: 69241
diff changeset
758 #define CHECK_LIVE_FRAME(x) \
6b4b6ba02f17 (CHECK_FRAME, CHECK_LIVE_FRAME): Use CHECK_TYPE.
Kim F. Storm <storm@cua.dk>
parents: 69241
diff changeset
759 CHECK_TYPE (FRAMEP (x) && FRAME_LIVE_P (XFRAME (x)), Qframe_live_p, x)
485
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
760
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
761 /* 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
762 `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
763 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
764 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
765 should be a Lisp_Object too; it is used to iterate through the
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
766 Vframe_list.
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
767
16051
ccf489f8596e Removed support for !MULTI_FRAME.
Karl Heuer <kwzh@gnu.org>
parents: 15390
diff changeset
768 This macro is a holdover from a time when multiple frames weren't always
ccf489f8596e Removed support for !MULTI_FRAME.
Karl Heuer <kwzh@gnu.org>
parents: 15390
diff changeset
769 supported. An alternate definition of the macro would expand to
ccf489f8596e Removed support for !MULTI_FRAME.
Karl Heuer <kwzh@gnu.org>
parents: 15390
diff changeset
770 something which executes the statement once. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
771
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
772 #define FOR_EACH_FRAME(list_var, frame_var) \
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
773 for ((list_var) = Vframe_list; \
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
774 (CONSP (list_var) \
25638
d02186608877 (FOR_EACH_FRAME): Use XCAR and XCDR.
Ken Raeburn <raeburn@raeburn.org>
parents: 25544
diff changeset
775 && (frame_var = XCAR (list_var), 1)); \
d02186608877 (FOR_EACH_FRAME): Use XCAR and XCDR.
Ken Raeburn <raeburn@raeburn.org>
parents: 25544
diff changeset
776 list_var = XCDR (list_var))
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
777
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
778
50358
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
779 extern Lisp_Object Qframep, Qframe_live_p;
83074
34a7a8f40548 Fix background-mode on terminal frames (Dan Nicolaescu).
Karoly Lorentey <lorentey@elte.hu>
parents: 83037
diff changeset
780 extern Lisp_Object Qtty, Qtty_type;
83431
76396de7f50a Rename `struct device' to `struct terminal'. Rename some terminal-related functions similarly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83427
diff changeset
781 extern Lisp_Object Qterminal, Qterminal_live_p;
83427
2afc49c9f0c0 Store local environment in frame (not terminal) parameters.
Karoly Lorentey <lorentey@elte.hu>
parents: 83415
diff changeset
782 extern Lisp_Object Qenvironment;
83640
2aee92eacdab * server.el (server-process-filter): Likewise.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 83635
diff changeset
783 extern Lisp_Object Qdisplay_environment_variable;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
784
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
785 extern struct frame *last_nonminibuf_frame;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
786
83008
040dd41ed7d0 Hookified termcap devices, added bootstrap display device, plus many bugfixes.
Karoly Lorentey <lorentey@elte.hu>
parents: 83004
diff changeset
787 extern struct frame *make_initial_frame P_ ((void));
83431
76396de7f50a Rename `struct device' to `struct terminal'. Rename some terminal-related functions similarly.
Karoly Lorentey <lorentey@elte.hu>
parents: 83427
diff changeset
788 extern struct frame *make_terminal_frame P_ ((struct terminal *));
20316
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
789 extern struct frame *make_frame P_ ((int));
21425
69491a9294a4 (make_frame_without_minibuffer): Conditionalize on HAVE_WINDOW_SYSTEM.
Richard M. Stallman <rms@gnu.org>
parents: 20316
diff changeset
790 #ifdef HAVE_WINDOW_SYSTEM
20316
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
791 extern struct frame *make_minibuffer_frame P_ ((void));
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
792 extern struct frame *make_frame_without_minibuffer P_ ((Lisp_Object,
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
793 struct kboard *,
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
794 Lisp_Object));
21425
69491a9294a4 (make_frame_without_minibuffer): Conditionalize on HAVE_WINDOW_SYSTEM.
Richard M. Stallman <rms@gnu.org>
parents: 20316
diff changeset
795 #endif /* HAVE_WINDOW_SYSTEM */
20316
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
796 extern int other_visible_frames P_ ((struct frame *));
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
797
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
798 extern Lisp_Object Vframe_list;
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
799 extern Lisp_Object Vdefault_frame_alist;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
800
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
801 extern Lisp_Object Vterminal_frame;
43367
7d02c2aeb8fb (Vmouse_highlight): Declare extern.
Kim F. Storm <storm@cua.dk>
parents: 41717
diff changeset
802
7d02c2aeb8fb (Vmouse_highlight): Declare extern.
Kim F. Storm <storm@cua.dk>
parents: 41717
diff changeset
803 extern Lisp_Object Vmouse_highlight;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
804
25670
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
805 /* The currently selected frame. */
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
806
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
807 extern Lisp_Object selected_frame;
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
808
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
809 /* Value is a pointer to the selected frame. If the selected frame
29439
b5e905b3b506 (struct frame): Use volatile unconditionally.
Dave Love <fx@gnu.org>
parents: 28691
diff changeset
810 isn't live, abort. */
25670
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
811
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
812 #define SELECTED_FRAME() \
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
813 ((FRAMEP (selected_frame) \
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
814 && FRAME_LIVE_P (XFRAME (selected_frame))) \
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
815 ? XFRAME (selected_frame) \
28651
2ce492de4cb9 (SELECTED_FRAME): Change definition to compile cleanly
Gerd Moellmann <gerd@gnu.org>
parents: 28417
diff changeset
816 : (abort (), (struct frame *) 0))
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
817
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
818
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
819 /***********************************************************************
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
820 Display-related Macros
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
821 ***********************************************************************/
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
822
64477
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
823 /* Canonical y-unit on frame F.
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
824 This value currently equals the line height of the frame (which is
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
825 the height of the default font of F). */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
826
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
827 #define FRAME_LINE_HEIGHT(F) ((F)->line_height)
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
828
64477
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
829 /* Canonical x-unit on frame F.
59203
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
830 This value currently equals the average width of the default font of F. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
831
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
832 #define FRAME_COLUMN_WIDTH(F) ((F)->column_width)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
833
59203
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
834 /* Space glyph width of the default font of frame F. */
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
835
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
836 #define FRAME_SPACE_WIDTH(F) ((F)->space_width)
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
837
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
838
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
839 /* Pixel width of areas used to display truncation marks, continuation
25460
8569b5f63527 (FRAME_WINDOW_WIDTH_ARG): Add in FRAME_FLAGS_AREA_COLS
Gerd Moellmann <gerd@gnu.org>
parents: 25029
diff changeset
840 marks, overlay arrows. This is 0 for terminal frames. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
841
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
842 #ifdef HAVE_WINDOW_SYSTEM
31147
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
843
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
844 /* Total width of fringes reserved for drawing truncation bitmaps,
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
845 continuation bitmaps and alike. The width is in canonical char
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
846 units of the frame. This must currently be the case because window
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
847 sizes aren't pixel values. If it weren't the case, we wouldn't be
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
848 able to split windows horizontally nicely. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
849
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
850 #define FRAME_FRINGE_COLS(F) ((F)->fringe_cols)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
851
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
852 /* Pixel-width of the left and right fringe. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
853
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
854 #define FRAME_LEFT_FRINGE_WIDTH(F) ((F)->left_fringe_width)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
855 #define FRAME_RIGHT_FRINGE_WIDTH(F) ((F)->right_fringe_width)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
856
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
857 /* Total width of fringes in pixels. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
858
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
859 #define FRAME_TOTAL_FRINGE_WIDTH(F) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
860 (FRAME_LEFT_FRINGE_WIDTH (F) + FRAME_RIGHT_FRINGE_WIDTH (F))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
861
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
862
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
863 /* Pixel-width of internal border lines */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
864
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
865 #define FRAME_INTERNAL_BORDER_WIDTH(F) ((F)->internal_border_width)
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
866
31147
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
867 #else /* not HAVE_WINDOW_SYSTEM */
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
868
41121
2b74029038bd Fringe cleanup.
Kim F. Storm <storm@cua.dk>
parents: 40655
diff changeset
869 #define FRAME_FRINGE_COLS(F) 0
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
870 #define FRAME_TOTAL_FRINGE_WIDTH(F) 0
41121
2b74029038bd Fringe cleanup.
Kim F. Storm <storm@cua.dk>
parents: 40655
diff changeset
871 #define FRAME_LEFT_FRINGE_WIDTH(F) 0
41717
6ca418a9510b (struct frame): Remove trunc_area_pixel_width and trunc_area_cols fields.
Kim F. Storm <storm@cua.dk>
parents: 41121
diff changeset
872 #define FRAME_RIGHT_FRINGE_WIDTH(F) 0
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
873 #define FRAME_INTERNAL_BORDER_WIDTH(F) 0
31147
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
874
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
875 #endif /* not HAVE_WINDOW_SYSTEM */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
876
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
877
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
878
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
879
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
880 /***********************************************************************
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
881 Conversion between canonical units and pixels
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
882 ***********************************************************************/
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
883
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
884 /* Canonical x-values are fractions of FRAME_COLUMN_WIDTH, canonical
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
885 y-unit are fractions of FRAME_LINE_HEIGHT of a frame. Both are
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
886 represented as Lisp numbers, i.e. integers or floats. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
887
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
888 /* Convert canonical value X to pixels. F is the frame whose
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
889 canonical char width is to be used. X must be a Lisp integer or
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
890 float. Value is a C integer. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
891
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
892 #define FRAME_PIXEL_X_FROM_CANON_X(F, X) \
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
893 (INTEGERP (X) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
894 ? XINT (X) * FRAME_COLUMN_WIDTH (F) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
895 : (int) (XFLOAT_DATA (X) * FRAME_COLUMN_WIDTH (F)))
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
896
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
897 /* Convert canonical value Y to pixels. F is the frame whose
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
898 canonical character height is to be used. X must be a Lisp integer
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
899 or float. Value is a C integer. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
900
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
901 #define FRAME_PIXEL_Y_FROM_CANON_Y(F, Y) \
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
902 (INTEGERP (Y) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
903 ? XINT (Y) * FRAME_LINE_HEIGHT (F) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
904 : (int) (XFLOAT_DATA (Y) * FRAME_LINE_HEIGHT (F)))
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
905
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
906 /* Convert pixel-value X to canonical units. F is the frame whose
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
907 canonical character width is to be used. X is a C integer. Result
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
908 is a Lisp float if X is not a multiple of the canon width,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
909 otherwise it's a Lisp integer. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
910
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
911 #define FRAME_CANON_X_FROM_PIXEL_X(F, X) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
912 ((X) % FRAME_COLUMN_WIDTH (F) != 0 \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
913 ? make_float ((double) (X) / FRAME_COLUMN_WIDTH (F)) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
914 : make_number ((X) / FRAME_COLUMN_WIDTH (F)))
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
915
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
916 /* Convert pixel-value Y to canonical units. F is the frame whose
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
917 canonical character height is to be used. Y is a C integer.
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
918 Result is a Lisp float if Y is not a multiple of the canon width,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
919 otherwise it's a Lisp integer. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
920
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
921 #define FRAME_CANON_Y_FROM_PIXEL_Y(F, Y) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
922 ((Y) % FRAME_LINE_HEIGHT (F) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
923 ? make_float ((double) (Y) / FRAME_LINE_HEIGHT (F)) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
924 : make_number ((Y) / FRAME_LINE_HEIGHT (F)))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
925
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
926
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
927
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
928 /* Manipulating pixel sizes and character sizes.
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
929 Knowledge of which factors affect the overall size of the window should
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
930 be hidden in these macros, if that's possible.
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
931
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
932 Return the upper/left pixel position of the character cell on frame F
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
933 at ROW/COL. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
934
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
935 #define FRAME_LINE_TO_PIXEL_Y(f, row) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
936 (FRAME_INTERNAL_BORDER_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
937 + (row) * FRAME_LINE_HEIGHT (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
938
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
939 #define FRAME_COL_TO_PIXEL_X(f, col) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
940 (FRAME_INTERNAL_BORDER_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
941 + (col) * FRAME_COLUMN_WIDTH (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
942
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
943 /* Return the pixel width/height of frame F if it has
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
944 COLS columns/LINES rows. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
945
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
946 #define FRAME_TEXT_COLS_TO_PIXEL_WIDTH(f, cols) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
947 (FRAME_COL_TO_PIXEL_X (f, cols) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
948 + (f)->scroll_bar_actual_width \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
949 + FRAME_TOTAL_FRINGE_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
950 + FRAME_INTERNAL_BORDER_WIDTH (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
951
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
952 #define FRAME_TEXT_LINES_TO_PIXEL_HEIGHT(f, lines) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
953 (FRAME_LINE_TO_PIXEL_Y (f, lines) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
954 + FRAME_INTERNAL_BORDER_WIDTH (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
955
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
956
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
957 /* Return the row/column (zero-based) of the character cell containing
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
958 the pixel on FRAME at Y/X. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
959
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
960 #define FRAME_PIXEL_Y_TO_LINE(f, y) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
961 (((y) - FRAME_INTERNAL_BORDER_WIDTH (f)) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
962 / FRAME_LINE_HEIGHT (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
963
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
964 #define FRAME_PIXEL_X_TO_COL(f, x) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
965 (((x) - FRAME_INTERNAL_BORDER_WIDTH (f)) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
966 / FRAME_COLUMN_WIDTH (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
967
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
968 /* How many columns/rows of text can we fit in WIDTH/HEIGHT pixels on
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
969 frame F? */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
970
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
971 #define FRAME_PIXEL_WIDTH_TO_TEXT_COLS(f, width) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
972 (FRAME_PIXEL_X_TO_COL (f, ((width) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
973 - FRAME_INTERNAL_BORDER_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
974 - FRAME_TOTAL_FRINGE_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
975 - (f)->scroll_bar_actual_width)))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
976
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
977 #define FRAME_PIXEL_HEIGHT_TO_TEXT_LINES(f, height) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
978 (FRAME_PIXEL_Y_TO_LINE (f, ((height) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
979 - FRAME_INTERNAL_BORDER_WIDTH (f))))
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
980
50358
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
981
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
982 /***********************************************************************
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
983 Frame Parameters
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
984 ***********************************************************************/
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
985
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
986 extern Lisp_Object Qauto_raise, Qauto_lower;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
987 extern Lisp_Object Qborder_color, Qborder_width;
83415
d2c799f58129 Implement full support for frame-local `next-buffer' and `previous-buffer'.
Karoly Lorentey <lorentey@elte.hu>
parents: 83364
diff changeset
988 extern Lisp_Object Qbuffer_predicate, Qbuffer_list, Qburied_buffer_list;
50358
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
989 extern Lisp_Object Qcursor_color, Qcursor_type;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
990 extern Lisp_Object Qfont;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
991 extern Lisp_Object Qbackground_color, Qforeground_color;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
992 extern Lisp_Object Qicon, Qicon_name, Qicon_type, Qicon_left, Qicon_top;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
993 extern Lisp_Object Qinternal_border_width;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
994 extern Lisp_Object Qmenu_bar_lines, Qtool_bar_lines;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
995 extern Lisp_Object Qmouse_color;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
996 extern Lisp_Object Qname, Qtitle;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
997 extern Lisp_Object Qparent_id;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
998 extern Lisp_Object Qunsplittable, Qvisibility;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
999 extern Lisp_Object Qscroll_bar_width, Qvertical_scroll_bars;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1000 extern Lisp_Object Qscroll_bar_foreground, Qscroll_bar_background;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1001 extern Lisp_Object Qscreen_gamma;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1002 extern Lisp_Object Qline_spacing;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1003 extern Lisp_Object Qwait_for_wm;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1004 extern Lisp_Object Qfullscreen;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1005
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1006 extern Lisp_Object Qleft_fringe, Qright_fringe;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1007 extern Lisp_Object Qheight, Qwidth;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1008 extern Lisp_Object Qminibuffer, Qmodeline;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1009 extern Lisp_Object Qonly;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1010 extern Lisp_Object Qx, Qw32, Qmac, Qpc;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1011 extern Lisp_Object Qvisible;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1012 extern Lisp_Object Qdisplay_type;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1013 extern Lisp_Object Qbackground_mode;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1014
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1015 extern Lisp_Object Qx_resource_name;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1016
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1017 extern Lisp_Object Qleft, Qright, Qtop, Qbox;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1018 extern Lisp_Object Qdisplay;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1019
83016
1d7467694692 Fix initialization of the window-system variable.
Karoly Lorentey <lorentey@elte.hu>
parents: 83008
diff changeset
1020 extern Lisp_Object Qwindow_system;
1d7467694692 Fix initialization of the window-system variable.
Karoly Lorentey <lorentey@elte.hu>
parents: 83008
diff changeset
1021
50358
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1022 #ifdef HAVE_WINDOW_SYSTEM
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1023
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1024 /* The class of this X application. */
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1025 #define EMACS_CLASS "Emacs"
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1026
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1027 enum
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1028 {
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1029 /* Values used as a bit mask, BOTH == WIDTH | HEIGHT. */
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1030 FULLSCREEN_NONE = 0,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1031 FULLSCREEN_WIDTH = 1,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1032 FULLSCREEN_HEIGHT = 2,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1033 FULLSCREEN_BOTH = 3,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1034 FULLSCREEN_WAIT = 4,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1035 };
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1036
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1037
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1038 /* These are in xterm.c, w32term.c, etc. */
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1039
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1040 extern void x_set_scroll_bar_default_width P_ ((struct frame *));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1041 extern void x_set_offset P_ ((struct frame *, int, int, int));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1042 extern void x_wm_set_icon_position P_ ((struct frame *, int, int));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1043
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1044 extern Lisp_Object x_new_font P_ ((struct frame *, char *));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1045 extern Lisp_Object x_new_fontset P_ ((struct frame *, char *));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1046
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1047
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1048 /* These are in frame.c */
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1049
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1050 extern Lisp_Object Vx_resource_name;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1051 extern Lisp_Object Vx_resource_class;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1052
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1053
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1054 extern Lisp_Object Qface_set_after_frame_default;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1055
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1056 extern void x_fullscreen_adjust P_ ((struct frame *f, int *, int *,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1057 int *, int *));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1058
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1059 extern void x_set_frame_parameters P_ ((struct frame *, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1060 extern void x_report_frame_params P_ ((struct frame *, Lisp_Object *));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1061
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1062 extern void x_set_fullscreen P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1063 extern void x_set_line_spacing P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1064 extern void x_set_screen_gamma P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1065 extern void x_set_font P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1066 extern void x_set_fringe_width P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1067 extern void x_set_border_width P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1068 extern void x_set_internal_border_width P_ ((struct frame *, Lisp_Object,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1069 Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1070 extern void x_set_visibility P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1071 extern void x_set_autoraise P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1072 extern void x_set_autolower P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1073 extern void x_set_unsplittable P_ ((struct frame *, Lisp_Object, Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1074 extern void x_set_vertical_scroll_bars P_ ((struct frame *, Lisp_Object,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1075 Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1076 extern void x_set_scroll_bar_width P_ ((struct frame *, Lisp_Object,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1077 Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1078
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1079 extern Lisp_Object x_icon_type P_ ((struct frame *));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1080
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1081 extern int x_figure_window_size P_ ((struct frame *, Lisp_Object, int));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1082
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1083
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1084 extern void validate_x_resource_name P_ ((void));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1085
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1086 #endif /* HAVE_WINDOW_SYSTEM */
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1087
35803
888df8063774 Change the include blocker to the same form as in other header
Gerd Moellmann <gerd@gnu.org>
parents: 35802
diff changeset
1088 #endif /* not EMACS_FRAME_H */
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 51665
diff changeset
1089
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 51665
diff changeset
1090 /* arch-tag: 0df048ee-e6bf-4f48-bd56-e3cd055dd8c4
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 51665
diff changeset
1091 (do not change this comment) */