annotate src/frame.h @ 80479:45332330ce1b

*** empty log message ***
author Jason Rumney <jasonr@gnu.org>
date Thu, 10 Apr 2008 09:42:29 +0000
parents 79a78354b1dd
children
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,
79759
fc2bcd2a8aad Add 2008 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 78985
diff changeset
3 2005, 2006, 2007, 2008 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
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
32 /* Nonzero means don't assume anything about current contents of
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
33 actual terminal frame */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
34
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
35 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
36
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
37 /* 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
38 print. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
39
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
40 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
41
78985
d9165841eb0a (focus_follows_mouse): Extern it.
Martin Rudalics <rudalics@gmx.at>
parents: 78780
diff changeset
42 /* Nonzero means window system changes focus when moving the
d9165841eb0a (focus_follows_mouse): Extern it.
Martin Rudalics <rudalics@gmx.at>
parents: 78780
diff changeset
43 mouse. */
d9165841eb0a (focus_follows_mouse): Extern it.
Martin Rudalics <rudalics@gmx.at>
parents: 78780
diff changeset
44
d9165841eb0a (focus_follows_mouse): Extern it.
Martin Rudalics <rudalics@gmx.at>
parents: 78780
diff changeset
45 extern int focus_follows_mouse;
d9165841eb0a (focus_follows_mouse): Extern it.
Martin Rudalics <rudalics@gmx.at>
parents: 78780
diff changeset
46
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
47
16051
ccf489f8596e Removed support for !MULTI_FRAME.
Karl Heuer <kwzh@gnu.org>
parents: 15390
diff changeset
48 /* The structure representing a frame. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
49
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
50 enum output_method
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
51 {
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
52 output_termcap,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
53 output_x_window,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
54 output_msdos_raw,
25524
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
55 output_w32,
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
56 output_mac
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
57 };
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
58
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
59 enum vertical_scroll_bar_type
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
60 {
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
61 vertical_scroll_bar_none,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
62 vertical_scroll_bar_left,
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
63 vertical_scroll_bar_right
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
64 };
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
65
47133
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
66 enum text_cursor_kinds
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
67 {
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
68 DEFAULT_CURSOR = -2,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
69 NO_CURSOR = -1,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
70 FILLED_BOX_CURSOR,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
71 HOLLOW_BOX_CURSOR,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
72 BAR_CURSOR,
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
73 HBAR_CURSOR
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
74 };
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
75
44890
01b93e5e53a7 Patch for building Emacs on Mac OS X. April 26, 2002. See ChangeLog,
Andrew Choi <akochoi@shaw.ca>
parents: 43367
diff changeset
76 #if !defined(MSDOS) && !defined(WINDOWSNT) && !defined(MAC_OS)
26729
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
77
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
78 #if !defined(HAVE_X_WINDOWS)
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
79
74496
9f89a8f57a99 (PIX_TYPE): Redefine as `unsigned long', for 64-bit platforms where long
Eli Zaretskii <eliz@gnu.org>
parents: 71823
diff changeset
80 #define PIX_TYPE unsigned long
26781
4982f642dfdc (PIX_TYPE) [! HAVE_X_WINDOWS]: Define PIX_TYPE.
Dave Love <fx@gnu.org>
parents: 26729
diff changeset
81
26729
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
82 /* A (mostly empty) x_output structure definition for building Emacs
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
83 on Unix and GNU/Linux without X support. */
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
84 struct x_output
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
85 {
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
86 PIX_TYPE background_pixel;
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
87 PIX_TYPE foreground_pixel;
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
88 };
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
89
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
90 #endif /* ! HAVE_X_WINDOWS */
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
91
26791
8284b35fb4fb (FRAME_FOREGROUND_PIXEL, FRAME_BACKGROUND_PIXEL)
Gerd Moellmann <gerd@gnu.org>
parents: 26781
diff changeset
92
8284b35fb4fb (FRAME_FOREGROUND_PIXEL, FRAME_BACKGROUND_PIXEL)
Gerd Moellmann <gerd@gnu.org>
parents: 26781
diff changeset
93 #define FRAME_FOREGROUND_PIXEL(f) ((f)->output_data.x->foreground_pixel)
8284b35fb4fb (FRAME_FOREGROUND_PIXEL, FRAME_BACKGROUND_PIXEL)
Gerd Moellmann <gerd@gnu.org>
parents: 26781
diff changeset
94 #define FRAME_BACKGROUND_PIXEL(f) ((f)->output_data.x->background_pixel)
8284b35fb4fb (FRAME_FOREGROUND_PIXEL, FRAME_BACKGROUND_PIXEL)
Gerd Moellmann <gerd@gnu.org>
parents: 26781
diff changeset
95
26729
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
96 /* A structure describing a termcap frame display. */
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
97 extern struct x_output tty_display;
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
98
44890
01b93e5e53a7 Patch for building Emacs on Mac OS X. April 26, 2002. See ChangeLog,
Andrew Choi <akochoi@shaw.ca>
parents: 43367
diff changeset
99 #endif /* ! MSDOS && ! WINDOWSNT && ! MAC_OS */
26729
f5dded41adcc Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents: 25711
diff changeset
100
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
101 struct frame
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
102 {
8826
9f5965fe4f6b (struct frame, selected_frame, last_nonminibuf_frame): Use EMACS_INT.
Richard M. Stallman <rms@gnu.org>
parents: 8233
diff changeset
103 EMACS_INT size;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
104 struct Lisp_Vector *next;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
105
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
106 /* All Lisp_Object components must come first.
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
107 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
108 That ensures they are all aligned normally. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
109
14215
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
110 /* 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
111 as well as for the title in some cases. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
112 Lisp_Object name;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
113
12274
f3383ea95b06 (struct frame): New field icon_name.
Richard M. Stallman <rms@gnu.org>
parents: 11493
diff changeset
114 /* 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
115 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
116 Lisp_Object icon_name;
f3383ea95b06 (struct frame): New field icon_name.
Richard M. Stallman <rms@gnu.org>
parents: 11493
diff changeset
117
14215
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
118 /* 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
119 Usually it is nil. */
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
120 Lisp_Object title;
f258b4fd44c0 (struct frame): New field `title'.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
121
3591
507f64624555 Apply typo patches from Paul Eggert.
Jim Blandy <jimb@redhat.com>
parents: 3518
diff changeset
122 /* 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
123 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
124 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
125 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
126 needed.
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
127
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
128 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
129 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
130 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
131 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
132 focus_frame is nil, Fselect_frame will leave it alone. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
133 Lisp_Object focus_frame;
357
1ad871406b12 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 261
diff changeset
134
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
135 /* This frame's root window. Every frame has one.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
136 If the frame has only a minibuffer window, this is it.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
137 Otherwise, if the frame has a minibuffer window, this is its sibling. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
138 Lisp_Object root_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
139
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
140 /* This frame's selected window.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
141 Each frame has its own window hierarchy
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
142 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
143 The selected window of the selected frame is Emacs's selected window. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
144 Lisp_Object selected_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
145
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
146 /* This frame's minibuffer window.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
147 Most frames have their own minibuffer windows,
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
148 but only the selected frame's minibuffer window
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
149 can actually appear to exist. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
150 Lisp_Object minibuffer_window;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
151
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
152 /* Parameter alist of this frame.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
153 These are the parameters specified when creating the frame
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
154 or modified with modify-frame-parameters. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
155 Lisp_Object param_alist;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
156
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
157 /* 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
158 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
159 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
160 This field is marked by the garbage collector. It is here
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
161 instead of in the `display' structure so that the garbage
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
162 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
163 structure. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
164 Lisp_Object scroll_bars;
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
165 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
166
15098
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
167 /* Vector describing the items to display in the menu bar.
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
168 Each item has four elements in this vector.
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
169 They are KEY, STRING, SUBMAP, and HPOS.
a3c8776451ce Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14215
diff changeset
170 (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
171 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
172 Lisp_Object menu_bar_items;
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
173
2396
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
174 /* 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
175 Lisp_Object face_alist;
80bed5e0c8aa (struct frame): New field face_alist.
Richard M. Stallman <rms@gnu.org>
parents: 2252
diff changeset
176
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
177 /* 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
178 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
179 Only the X toolkit version uses this. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
180 Lisp_Object menu_bar_vector;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
181 /* 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
182 EMACS_INT menu_bar_items_used;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
183
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
184 /* Predicate for selecting buffers for other-buffer. */
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
185 Lisp_Object buffer_predicate;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
186
17222
60053e19d485 (struct frame): New field buffer_list.
Richard M. Stallman <rms@gnu.org>
parents: 17033
diff changeset
187 /* 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
188 Lisp_Object buffer_list;
60053e19d485 (struct frame): New field buffer_list.
Richard M. Stallman <rms@gnu.org>
parents: 17033
diff changeset
189
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
190 /* 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
191 toolkit support is available. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
192 Lisp_Object menu_bar_window;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
193
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
194 /* 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
195 Lisp_Object tool_bar_window;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
196
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
197 /* Desired and current tool-bar items. */
33759
593bc303c500 (struct frame): Members desired_tool_bar_items,
Gerd Moellmann <gerd@gnu.org>
parents: 32752
diff changeset
198 Lisp_Object tool_bar_items;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
199
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
200 /* 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
201 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
202
17222
60053e19d485 (struct frame): New field buffer_list.
Richard M. Stallman <rms@gnu.org>
parents: 17033
diff changeset
203 /* 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
204
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
205 /* Cache of realized faces. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
206 struct face_cache *face_cache;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
207
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
208 /* 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
209 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
210 char *namebuf;
7a15a07093c2 (struct frame): New member namebuf.
Karl Heuer <kwzh@gnu.org>
parents: 11351
diff changeset
211
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
212 /* Glyph pool and matrix. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
213 struct glyph_pool *current_pool;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
214 struct glyph_pool *desired_pool;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
215 struct glyph_matrix *desired_matrix;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
216 struct glyph_matrix *current_matrix;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
217
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
218 /* 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
219 be used for output. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
220 unsigned glyphs_initialized_p : 1;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
221
80386
79a78354b1dd (struct frame) [MAC_OS]: New member external_tool_bar.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents: 79759
diff changeset
222 #if defined (USE_GTK) || defined (MAC_OS)
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
223 /* 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
224 int external_tool_bar;
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
225 #endif
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
226
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
227 /* 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
228 int tool_bar_lines;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
229
69241
d34c25a166bd (struct frame): New member n_tool_bar_rows.
Kim F. Storm <storm@cua.dk>
parents: 68651
diff changeset
230 int n_tool_bar_rows;
33759
593bc303c500 (struct frame): Members desired_tool_bar_items,
Gerd Moellmann <gerd@gnu.org>
parents: 32752
diff changeset
231 int n_tool_bar_items;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
232
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
233 /* A buffer for decode_mode_line. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
234 char *decode_mode_spec_buffer;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
235
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
236 /* 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
237 /* 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
238 int *insert_line_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
239 /* 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
240 int *delete_line_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
241 /* 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
242 int *insert_n_lines_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
243 /* 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
244 int *delete_n_lines_cost;
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
245
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
246 /* 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
247 in units of canonical characters. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
248 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
249
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
250 /* 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
251 canonical characters. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
252 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
253
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
254 /* 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
255 0 if no change pending. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
256 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
257
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
258 /* 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
259 int left_pos, top_pos;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
260
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
261 /* 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
262 int pixel_height, pixel_width;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
263
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
264 /* 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
265 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
266 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
267
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
268 /* 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
269 int win_gravity;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
270
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
271 /* 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
272 int size_hint_flags;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
273
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
274 /* 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
275 int border_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
276
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
277 /* 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
278 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
279 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
280 int internal_border_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
281
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
282 /* 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
283 int column_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
284
59203
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
285 /* 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
286 int space_width;
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
287
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
288 /* 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
289 int line_height;
10208
9e8f603bcff4 (struct frame): New field buffer_predicate.
Richard M. Stallman <rms@gnu.org>
parents: 10120
diff changeset
290
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
291 /* The output method says how the contents of this frame
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
292 are displayed. It could be using termcap, or using an X window. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
293 enum output_method output_method;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
294
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
295 /* A structure of auxiliary data used for displaying the contents.
12665
427a3d6560bf (struct frame): Rename `display' member to `output_data'.
Richard M. Stallman <rms@gnu.org>
parents: 12543
diff changeset
296 struct x_output is used for X window frames;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
297 it is defined in xterm.h.
16588
481b7874a1e9 Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16429
diff changeset
298 struct w32_output is used for W32 window frames;
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
299 it is defined in w32term.h. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
300 union output_data
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
301 {
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
302 struct x_output *x;
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
303 struct w32_output *w32;
25524
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
304 struct mac_output *mac;
31900
8b2fa657800d (struct frame): Make the `nothing' member of union
Gerd Moellmann <gerd@gnu.org>
parents: 31147
diff changeset
305 EMACS_INT nothing;
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
306 }
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
307 output_data;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
308
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
309 /* 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
310 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
311 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
312 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
313 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
314 int fringe_cols;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
315
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
316 /* 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
317 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
318
11005
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
319 #ifdef MULTI_KBOARD
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
320 /* A pointer to the kboard structure associated with this frame.
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
321 For termcap frames, this points to initial_kboard. For X frames,
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
322 it will be the same as display.x->display_info->kboard. */
11351
beecf2972ed3 (struct frame): Use `struct kboard', not KBOARD.
Richard M. Stallman <rms@gnu.org>
parents: 11005
diff changeset
323 struct kboard *kboard;
11005
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
324 #endif
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
325
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
326 /* See FULLSCREEN_ enum below */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
327 int want_fullscreen;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
328
2148
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
329 /* 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
330 int menu_bar_lines;
9b8040c3f320 (FRAME_MENU_BAR_ITEMS): New macro (two versions).
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
331
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
332 #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
333 || defined (USE_GTK)
5657
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
334 /* 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
335 int external_menu_bar;
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
336 #endif
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
337
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
338 /* Nonzero if last attempt at redisplay on this frame was preempted. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
339 char display_preempted;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
340
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
341 /* 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
342 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
343 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
344
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
345 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
346 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
347 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
348
19696
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
349 On Windows NT/9X, to avoid wasting effort updating visible frames
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
350 that are actually completely obscured by other windows on the
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
351 display, we bend the meaning of visible slightly: if greater than
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
352 1, then the frame is obscured - we still consider it to be
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
353 "visible" as seen from lisp, but we don't bother updating it. We
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
354 must take care to garbage the frame when it ceaces to be obscured
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
355 though. Note that these semantics are only used on NT/9X.
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
356
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
357 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
358
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
359 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
360 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
361 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
362 at the next redisplay.
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
363
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
364 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
365 FRAME_SAMPLE_VISIBILITY.
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
366
6183
242d3fed9285 Fix typo in comment.
Karl Heuer <kwzh@gnu.org>
parents: 5657
diff changeset
367 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
368 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
369 char visible, iconified;
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
370
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
371 /* 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
372 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
373 See FRAME_SAMPLE_VISIBILITY, below. */
29439
b5e905b3b506 (struct frame): Use volatile unconditionally.
Dave Love <fx@gnu.org>
parents: 28691
diff changeset
374 volatile char async_visible, async_iconified;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
375
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
376 /* Nonzero if this frame should be redrawn. */
29439
b5e905b3b506 (struct frame): Use volatile unconditionally.
Dave Love <fx@gnu.org>
parents: 28691
diff changeset
377 volatile char garbaged;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
378
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
379 /* True if frame actually has a minibuffer window on it.
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
380 0 if using a minibuffer window that isn't on this frame. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
381 char has_minibuffer;
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
382
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
383 /* 0 means, if this frame has just one window,
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
384 show no modeline for that window. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
385 char wants_modeline;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
386
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
387 /* 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
388 support scroll bars. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
389 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
390
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
391 /* 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
392 actually display them on this frame. */
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
393 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
394
47133
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
395 /* 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
396 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
397 enum text_cursor_kinds desired_cursor;
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
398
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
399 /* 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
400 int cursor_width;
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
401
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
402 /* 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
403 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
404 enum text_cursor_kinds blink_off_cursor;
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
405
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
406 /* 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
407 int blink_off_cursor_width;
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
408
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
409 /* 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
410 char auto_raise;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
411
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
412 /* 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
413 char auto_lower;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
414
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
415 /* True if frame's root window can't be split. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
416 char no_split;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
417
998
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
418 /* 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
419 the current buffer, etcetera. If the user explicitly sets the frame
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
420 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
421 cleared. */
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
422 char explicit_name;
61c6983219ff entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 984
diff changeset
423
10665
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
424 /* 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
425 char window_sizes_changed;
4e7da2fc451b (struct frame): New field window_sizes_changed.
Richard M. Stallman <rms@gnu.org>
parents: 10288
diff changeset
426
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
427 /* Storage for messages to this frame. */
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
428 char *message_buf;
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
429
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
430 /* Nonnegative if current redisplay should not do scroll computation
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
431 for lines beyond a certain vpos. This is the vpos. */
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
432 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
433
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
434 /* 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
435 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
436 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
437 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
438 and the current font width. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
439 int config_scroll_bar_width;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
440 int config_scroll_bar_cols;
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
441
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
442 /* 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
443 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
444 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
445
8b5ae8d2eefc (struct frame): New field cost_calculation_baud_rate.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
446 /* 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
447 int cost_calculation_baud_rate;
12543
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
448
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
449 /* Nonzero if the mouse has moved on this display
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
450 since the last time we checked. */
13aa3e939a4d (struct frame): New field `mouse_moved'.
Karl Heuer <kwzh@gnu.org>
parents: 12274
diff changeset
451 char mouse_moved;
25527
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
452
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
453 /* Exponent for gamma correction of colors. 1/(VIEWING_GAMMA *
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
454 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
455 frame parameter. 0 means don't do gamma correction. */
93b2f5b92137 (struct frame): New member `gamma'.
Gerd Moellmann <gerd@gnu.org>
parents: 25524
diff changeset
456 double gamma;
28691
26fdeb2124f0 (struct frame): Add member extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents: 28651
diff changeset
457
26fdeb2124f0 (struct frame): Add member extra_line_spacing.
Gerd Moellmann <gerd@gnu.org>
parents: 28651
diff changeset
458 /* 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
459 int extra_line_spacing;
40511
35857e7683d8 (struct frame) <resized_p>: New member.
Gerd Moellmann <gerd@gnu.org>
parents: 35803
diff changeset
460
35857e7683d8 (struct frame) <resized_p>: New member.
Gerd Moellmann <gerd@gnu.org>
parents: 35803
diff changeset
461 /* 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
462 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
463 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
464
53883
8454bbf234cb (struct frame): New member force_flush_display_p.
Kim F. Storm <storm@cua.dk>
parents: 53177
diff changeset
465 /* 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
466 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
467 unsigned force_flush_display_p : 1;
8454bbf234cb (struct frame): New member force_flush_display_p.
Kim F. Storm <storm@cua.dk>
parents: 53177
diff changeset
468
51665
c1f65dfc56eb Fix some of the font/face problems.
Jan Djärv <jan.h.d@swipnet.se>
parents: 51195
diff changeset
469 /* 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
470 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
471 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
472 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
473
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
474 /* 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
475 current redisplay. */
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
476 unsigned already_hscrolled_p : 1;
65373
efc66a29d707 (struct frame): New member updated_p.
Kim F. Storm <storm@cua.dk>
parents: 64770
diff changeset
477
efc66a29d707 (struct frame): New member updated_p.
Kim F. Storm <storm@cua.dk>
parents: 64770
diff changeset
478 /* 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
479 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
480
5a5bdcf2b324 (struct frame): New member minimize_tool_bar_window_p.
Kim F. Storm <storm@cua.dk>
parents: 74496
diff changeset
481 /* 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
482 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
483 unsigned minimize_tool_bar_window_p : 1;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
484 };
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
485
16051
ccf489f8596e Removed support for !MULTI_FRAME.
Karl Heuer <kwzh@gnu.org>
parents: 15390
diff changeset
486 #ifdef MULTI_KBOARD
11005
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
487 #define FRAME_KBOARD(f) ((f)->kboard)
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
488 #else
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
489 #define FRAME_KBOARD(f) (&the_only_kboard)
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
490 #endif
3155b56586e9 (struct frame): New member kboard.
Karl Heuer <kwzh@gnu.org>
parents: 10665
diff changeset
491
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
492 typedef struct frame *FRAME_PTR;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
493
28417
4b675266db04 * lisp.h (XCONS, XSTRING, XSYMBOL, XFLOAT, XPROCESS, XWINDOW, XSUBR, XBUFFER):
Ken Raeburn <raeburn@raeburn.org>
parents: 28226
diff changeset
494 #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
495 #define XSETFRAME(a, b) (XSETPSEUDOVECTOR (a, b, PVEC_FRAME))
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
496
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
497 /* Given a window, return its frame as a Lisp_Object. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
498 #define WINDOW_FRAME(w) (w)->frame
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
499
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
500 /* Test a frame for particular kinds of display methods. */
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
501 #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
502 #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
503 #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
504 #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
505 #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
506
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
507 /* 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
508 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
509
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
510 #ifdef HAVE_X_WINDOWS
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
511 #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
512 #endif
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
513 #ifdef HAVE_NTGUI
16588
481b7874a1e9 Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16429
diff changeset
514 #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
515 #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
516 #ifdef MAC_OS
25524
095548b9a36c Do nothing if included a second time.
Richard M. Stallman <rms@gnu.org>
parents: 25460
diff changeset
517 #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
518 #endif
13568
01ec2620dd87 (FRAME_WINDOW_P): Always define it one way or another.
Richard M. Stallman <rms@gnu.org>
parents: 13411
diff changeset
519 #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
520 #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
521 #endif
13411
58efb2561888 (output_method): New method: output_win32.
Geoff Voelker <voelker@cs.washington.edu>
parents: 12665
diff changeset
522
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
523 /* Nonzero if frame F is still alive (not deleted). */
12665
427a3d6560bf (struct frame): Rename `display' member to `output_data'.
Richard M. Stallman <rms@gnu.org>
parents: 12543
diff changeset
524 #define FRAME_LIVE_P(f) ((f)->output_data.nothing != 0)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
525
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
526 /* Nonzero if frame F is a minibuffer-only frame. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
527 #define FRAME_MINIBUF_ONLY_P(f) \
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
528 EQ (FRAME_ROOT_WINDOW (f), FRAME_MINIBUF_WINDOW (f))
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
529
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
530 /* Nonzero if frame F contains a minibuffer window.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
531 (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
532 #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
533
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
534 /* 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
535 non-toolkit tool bar lines. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
536 #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
537
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
538 /* Pixel width of frame F. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
539 #define FRAME_PIXEL_WIDTH(f) ((f)->pixel_width)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
540
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
541 /* 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
542 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
543 #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
544
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
545 /* Width of frame F, measured in canonical character columns,
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
546 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
547 #define FRAME_COLS(f) (f)->text_cols
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
548
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
549 /* Number of lines of frame F used for menu bar.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
550 This is relevant on terminal frames and on
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
551 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
552 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
553 #define FRAME_MENU_BAR_LINES(f) (f)->menu_bar_lines
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
554
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
555 /* Nonzero if this frame should display a tool bar
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
556 in a way that does not use any text lines. */
80386
79a78354b1dd (struct frame) [MAC_OS]: New member external_tool_bar.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents: 79759
diff changeset
557 #if defined (USE_GTK) || defined (MAC_OS)
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
558 #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
559 #else
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
560 #define FRAME_EXTERNAL_TOOL_BAR(f) 0
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
561 #endif
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
562
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
563 /* 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
564
25544
693ca9ba497a Change spelling of `toolbar' to `tool_bar' or `tool-bar'.
Gerd Moellmann <gerd@gnu.org>
parents: 25527
diff changeset
565 #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
566
49322
2cbb0b823e83 GTK version
Jan Djärv <jan.h.d@swipnet.se>
parents: 48321
diff changeset
567
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
568 /* Lines above the top-most window in frame F. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
569
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
570 #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
571 (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
572
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
573 /* Nonzero if this frame should display a menu bar
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
574 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
575 #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
576 || defined (USE_GTK)
5657
ac0f9da25111 (struct frame): New field external_menu_bar.
Richard M. Stallman <rms@gnu.org>
parents: 3649
diff changeset
577 #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
578 #else
5b063488f2f8 (FRAME_EXTERNAL_MENU_BAR) [!USE_X_TOOLKIT]: Give zero.
Richard M. Stallman <rms@gnu.org>
parents: 7307
diff changeset
579 #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
580 #endif
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
581 #define FRAME_VISIBLE_P(f) ((f)->visible != 0)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
582
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
583 /* 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
584 #define FRAME_OBSCURED_P(f) ((f)->visible > 1)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
585
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
586 /* Nonzero if frame F is currently iconified. */
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
587 #define FRAME_ICONIFIED_P(f) (f)->iconified
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
588
1710
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
589 #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
590 ((f)->async_visible = (p), FRAME_SAMPLE_VISIBILITY (f))
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
591 #define SET_FRAME_GARBAGED(f) (frame_garbaged = 1, f->garbaged = 1)
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
592 #define FRAME_GARBAGED_P(f) (f)->garbaged
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
593
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
594 /* Nonzero means do not allow splitting this frame's window. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
595 #define FRAME_NO_SPLIT_P(f) (f)->no_split
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
596
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
597 /* Not really implemented. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
598 #define FRAME_WANTS_MODELINE_P(f) (f)->wants_modeline
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
599
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
600 /* Nonzero if a size change has been requested for frame F
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
601 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
602 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
603 #define FRAME_WINDOW_SIZES_CHANGED(f) (f)->window_sizes_changed
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
604
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
605 /* 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
606 #define FRAME_MINIBUF_WINDOW(f) (f)->minibuffer_window
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
607
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
608 /* The root window of the window tree of frame F. */
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
609 #define FRAME_ROOT_WINDOW(f) (f)->root_window
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
610
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
611 /* 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
612 #define FRAME_SELECTED_WINDOW(f) (f)->selected_window
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
613
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
614 #define FRAME_INSERT_COST(f) (f)->insert_line_cost
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
615 #define FRAME_DELETE_COST(f) (f)->delete_line_cost
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
616 #define FRAME_INSERTN_COST(f) (f)->insert_n_lines_cost
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
617 #define FRAME_DELETEN_COST(f) (f)->delete_n_lines_cost
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
618 #define FRAME_MESSAGE_BUF(f) (f)->message_buf
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
619 #define FRAME_SCROLL_BOTTOM_VPOS(f) (f)->scroll_bottom_vpos
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
620 #define FRAME_FOCUS_FRAME(f) (f)->focus_frame
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 /* Nonzero if frame F supports scroll bars.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
623 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
624 on frame F. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
625 #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
626
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
627 /* 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
628 and which side they are on. */
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
629 #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
630 #define FRAME_HAS_VERTICAL_SCROLL_BARS(f) \
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
631 ((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
632 #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
633 ((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
634 #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
635 ((f)->vertical_scroll_bar_type == vertical_scroll_bar_right)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
636
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
637 /* 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
638 Measured in pixels.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
639 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
640 #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
641
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
642 /* 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
643 Measured in columns (characters).
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
644 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
645 #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
646
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
647 /* 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
648 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
649 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
650
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
651 #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
652 (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
653 ? FRAME_CONFIG_SCROLL_BAR_COLS (f) \
35798
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
654 : 0)
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
655
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
656 /* 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
657
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
658 #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
659 (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
660 ? (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
661 : 0)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
662
35798
48534cd0de43 (FRAME_RIGHT_SCROLL_BAR_WIDTH): New define.
Gerd Moellmann <gerd@gnu.org>
parents: 35446
diff changeset
663 /* 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
664 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
665 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
666
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
667 #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
668 (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
669 ? FRAME_CONFIG_SCROLL_BAR_COLS (f) \
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
670 : 0)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
671
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
672 /* 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
673
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
674 #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
675 (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
676 ? (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
677 : 0)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
678
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
679 /* 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
680
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
681 #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
682 (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
683 ? FRAME_CONFIG_SCROLL_BAR_COLS (f) \
16270
4547dae187e9 (vertical_scroll_bar_type): Add enumerated
Richard M. Stallman <rms@gnu.org>
parents: 16051
diff changeset
684 : 0)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
685
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
686 /* 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
687
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
688 #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
689 (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
690 ? (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
691 : 0)
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
692
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
693 /* Total width of frame F, in columns (characters),
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
694 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
695
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
696 #define FRAME_TOTAL_COLS(f) ((f)->total_cols)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
697
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
698 /* Set the width of frame F to VAL.
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
699 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
700 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
701
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
702 #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
703 (FRAME_COLS (f) = (val), \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
704 (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
705
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
706 /* 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
707 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
708
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
709 #define FRAME_TOTAL_COLS_ARG(f, width) \
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
710 ((width) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
711 + FRAME_SCROLL_BAR_COLS (f) \
41121
2b74029038bd Fringe cleanup.
Kim F. Storm <storm@cua.dk>
parents: 40655
diff changeset
712 + FRAME_FRINGE_COLS (f))
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
713
21762
b2746acaa663 (FRAME_CURSOR_X_LIMIT): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 21425
diff changeset
714 /* 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
715
21762
b2746acaa663 (FRAME_CURSOR_X_LIMIT): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 21425
diff changeset
716 #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
717 (FRAME_COLS (f) + FRAME_LEFT_SCROLL_BAR_COLS (f))
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
718
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
719 /* 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
720
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
721 #define FRAME_SCROLL_BARS(f) ((f)->scroll_bars)
21814
852655b4c6f9 Comment changes.
Richard M. Stallman <rms@gnu.org>
parents: 21762
diff changeset
722
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
723 #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
724 #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
725 #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
726
47133
85e238cd7287 (enum text_cursor_kinds): Consolidated here.
Kim F. Storm <storm@cua.dk>
parents: 44890
diff changeset
727 #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
728 #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
729 #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
730 #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
731
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
732 /* Return a pointer to the face cache of frame F. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
733
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
734 #define FRAME_FACE_CACHE(F) (F)->face_cache
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
735
17033
ffd6878cae02 (struct frame): New member `fontset_data'.
Karl Heuer <kwzh@gnu.org>
parents: 16588
diff changeset
736 /* 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
737 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
738 4-byte for a character. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
739
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
740 #define FRAME_MESSAGE_BUF_SIZE(f) (((int) FRAME_COLS (f)) * 4)
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
741
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
742 /* 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
743 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
744 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
745 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
746 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
747 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
748 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
749
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
750 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
751 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
752
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
753 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
754 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
755 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
756 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
757 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
758 counterparts.
26054080a152 * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1653
diff changeset
759
1776
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
760 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
761
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
762 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
763 it must be marked as garbaged, since redisplay hasn't been keeping
20c6f4aa5843 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1710
diff changeset
764 up its contents. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
765
1653
fd573317f468 * frame.h (struct frame): New fields called async_visible and
Jim Blandy <jimb@redhat.com>
parents: 998
diff changeset
766 #define FRAME_SAMPLE_VISIBILITY(f) \
19696
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
767 (((f)->async_visible && (f)->visible != (f)->async_visible) ? \
dc5e4b1ce93c (FRAME_OBSCURED_P): New macro.
Geoff Voelker <voelker@cs.washington.edu>
parents: 17222
diff changeset
768 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
769 (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
770 (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
771
71823
6b4b6ba02f17 (CHECK_FRAME, CHECK_LIVE_FRAME): Use CHECK_TYPE.
Kim F. Storm <storm@cua.dk>
parents: 69241
diff changeset
772 #define CHECK_FRAME(x) \
6b4b6ba02f17 (CHECK_FRAME, CHECK_LIVE_FRAME): Use CHECK_TYPE.
Kim F. Storm <storm@cua.dk>
parents: 69241
diff changeset
773 CHECK_TYPE (FRAMEP (x), Qframep, x)
485
8c615e453683 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
774
71823
6b4b6ba02f17 (CHECK_FRAME, CHECK_LIVE_FRAME): Use CHECK_TYPE.
Kim F. Storm <storm@cua.dk>
parents: 69241
diff changeset
775 #define CHECK_LIVE_FRAME(x) \
6b4b6ba02f17 (CHECK_FRAME, CHECK_LIVE_FRAME): Use CHECK_TYPE.
Kim F. Storm <storm@cua.dk>
parents: 69241
diff changeset
776 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
777
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
778 /* 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
779 `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
780 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
781 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
782 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
783 Vframe_list.
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
784
16051
ccf489f8596e Removed support for !MULTI_FRAME.
Karl Heuer <kwzh@gnu.org>
parents: 15390
diff changeset
785 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
786 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
787 something which executes the statement once. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
788
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
789 #define FOR_EACH_FRAME(list_var, frame_var) \
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
790 for ((list_var) = Vframe_list; \
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
791 (CONSP (list_var) \
25638
d02186608877 (FOR_EACH_FRAME): Use XCAR and XCDR.
Ken Raeburn <raeburn@raeburn.org>
parents: 25544
diff changeset
792 && (frame_var = XCAR (list_var), 1)); \
d02186608877 (FOR_EACH_FRAME): Use XCAR and XCDR.
Ken Raeburn <raeburn@raeburn.org>
parents: 25544
diff changeset
793 list_var = XCDR (list_var))
732
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
794
a8d94735277e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 485
diff changeset
795
50358
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
796 extern Lisp_Object Qframep, Qframe_live_p;
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 struct frame *last_nonminibuf_frame;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
799
20316
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
800 extern struct frame *make_terminal_frame P_ ((void));
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
801 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
802 #ifdef HAVE_WINDOW_SYSTEM
20316
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
803 extern struct frame *make_minibuffer_frame P_ ((void));
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
804 extern struct frame *make_frame_without_minibuffer P_ ((Lisp_Object,
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
805 struct kboard *,
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
806 Lisp_Object));
21425
69491a9294a4 (make_frame_without_minibuffer): Conditionalize on HAVE_WINDOW_SYSTEM.
Richard M. Stallman <rms@gnu.org>
parents: 20316
diff changeset
807 #endif /* HAVE_WINDOW_SYSTEM */
20316
2a2818b0812e Protoize function declarations.
Andreas Schwab <schwab@suse.de>
parents: 19696
diff changeset
808 extern int other_visible_frames P_ ((struct frame *));
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
809
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
810 extern Lisp_Object Vframe_list;
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
811 extern Lisp_Object Vdefault_frame_alist;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
812
765
e4093444f9f8 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 732
diff changeset
813 extern Lisp_Object Vterminal_frame;
43367
7d02c2aeb8fb (Vmouse_highlight): Declare extern.
Kim F. Storm <storm@cua.dk>
parents: 41717
diff changeset
814
7d02c2aeb8fb (Vmouse_highlight): Declare extern.
Kim F. Storm <storm@cua.dk>
parents: 41717
diff changeset
815 extern Lisp_Object Vmouse_highlight;
261
731afdb0842c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
816
25670
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
817 /* The currently selected frame. */
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
818
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
819 extern Lisp_Object selected_frame;
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
820
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
821 /* 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
822 isn't live, abort. */
25670
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
823
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
824 #define SELECTED_FRAME() \
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
825 ((FRAMEP (selected_frame) \
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
826 && FRAME_LIVE_P (XFRAME (selected_frame))) \
728844445e1c (SELECTED_FRAME): New.
Gerd Moellmann <gerd@gnu.org>
parents: 25638
diff changeset
827 ? XFRAME (selected_frame) \
28651
2ce492de4cb9 (SELECTED_FRAME): Change definition to compile cleanly
Gerd Moellmann <gerd@gnu.org>
parents: 28417
diff changeset
828 : (abort (), (struct frame *) 0))
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
829
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
830
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
831 /***********************************************************************
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
832 Display-related Macros
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
833 ***********************************************************************/
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
834
64477
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
835 /* 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
836 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
837 the height of the default font of F). */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
838
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
839 #define FRAME_LINE_HEIGHT(F) ((F)->line_height)
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
840
64477
def523ae062b (struct frame): New member already_hscrolled_p.
Kim F. Storm <storm@cua.dk>
parents: 64084
diff changeset
841 /* Canonical x-unit on frame F.
59203
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
842 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
843
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
844 #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
845
59203
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
846 /* 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
847
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
848 #define FRAME_SPACE_WIDTH(F) ((F)->space_width)
3573aee81cc8 (struct frame): New member space_width.
Kenichi Handa <handa@m17n.org>
parents: 53883
diff changeset
849
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
850
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
851 /* 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
852 marks, overlay arrows. This is 0 for terminal frames. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
853
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
854 #ifdef HAVE_WINDOW_SYSTEM
31147
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
855
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
856 /* 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
857 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
858 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
859 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
860 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
861
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
862 #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
863
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
864 /* 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
865
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
866 #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
867 #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
868
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
869 /* 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
870
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
871 #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
872 (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
873
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
874
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
875 /* 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
876
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
877 #define FRAME_INTERNAL_BORDER_WIDTH(F) ((F)->internal_border_width)
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
878
31147
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
879 #else /* not HAVE_WINDOW_SYSTEM */
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
880
41121
2b74029038bd Fringe cleanup.
Kim F. Storm <storm@cua.dk>
parents: 40655
diff changeset
881 #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
882 #define FRAME_TOTAL_FRINGE_WIDTH(F) 0
41121
2b74029038bd Fringe cleanup.
Kim F. Storm <storm@cua.dk>
parents: 40655
diff changeset
883 #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
884 #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
885 #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
886
a158ff61b113 (FRAME_FLAGS_AREA_COLS, FRAME_FLAGS_AREA_WIDTH)
Gerd Moellmann <gerd@gnu.org>
parents: 29439
diff changeset
887 #endif /* not HAVE_WINDOW_SYSTEM */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
888
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
889
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
890
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
891
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
892 /***********************************************************************
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
893 Conversion between canonical units and pixels
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
894 ***********************************************************************/
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
895
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
896 /* 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
897 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
898 represented as Lisp numbers, i.e. integers or floats. */
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
899
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
900 /* 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
901 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
902 float. Value is a C integer. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
903
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
904 #define FRAME_PIXEL_X_FROM_CANON_X(F, X) \
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
905 (INTEGERP (X) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
906 ? 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
907 : (int) (XFLOAT_DATA (X) * FRAME_COLUMN_WIDTH (F)))
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
908
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
909 /* 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
910 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
911 or float. Value is a C integer. */
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
912
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
913 #define FRAME_PIXEL_Y_FROM_CANON_Y(F, Y) \
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
914 (INTEGERP (Y) \
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
915 ? 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
916 : (int) (XFLOAT_DATA (Y) * FRAME_LINE_HEIGHT (F)))
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
917
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
918 /* 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
919 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
920 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
921 otherwise it's a Lisp integer. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
922
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
923 #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
924 ((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
925 ? 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
926 : make_number ((X) / FRAME_COLUMN_WIDTH (F)))
25029
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
927
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
928 /* 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
929 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
930 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
931 otherwise it's a Lisp integer. */
dc975d71a3a5 (FRAME_TOOLBAR_LINES): New.
Gerd Moellmann <gerd@gnu.org>
parents: 21814
diff changeset
932
51195
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
933 #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
934 ((Y) % FRAME_LINE_HEIGHT (F) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
935 ? 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
936 : 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
937
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
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
940 /* 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
941 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
942 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
943
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
944 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
945 at ROW/COL. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
946
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
947 #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
948 (FRAME_INTERNAL_BORDER_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
949 + (row) * FRAME_LINE_HEIGHT (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
950
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
951 #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
952 (FRAME_INTERNAL_BORDER_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
953 + (col) * FRAME_COLUMN_WIDTH (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
954
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
955 /* 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
956 COLS columns/LINES rows. */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
957
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
958 #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
959 (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
960 + (f)->scroll_bar_actual_width \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
961 + FRAME_TOTAL_FRINGE_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
962 + FRAME_INTERNAL_BORDER_WIDTH (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_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
965 (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
966 + FRAME_INTERNAL_BORDER_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
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
969 /* 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
970 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
971
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
972 #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
973 (((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
974 / FRAME_LINE_HEIGHT (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
975
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
976 #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
977 (((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
978 / FRAME_COLUMN_WIDTH (f))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
979
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
980 /* 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
981 frame F? */
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
982
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
983 #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
984 (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
985 - FRAME_INTERNAL_BORDER_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
986 - FRAME_TOTAL_FRINGE_WIDTH (f) \
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
987 - (f)->scroll_bar_actual_width)))
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
988
3cbf29813eea (struct frame): Rename members height to text_lines,
Kim F. Storm <storm@cua.dk>
parents: 50358
diff changeset
989 #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
990 (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
991 - FRAME_INTERNAL_BORDER_WIDTH (f))))
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 49322
diff changeset
992
50358
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
993
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
994 /***********************************************************************
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
995 Frame Parameters
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
996 ***********************************************************************/
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
997
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
998 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
999 extern Lisp_Object Qborder_color, Qborder_width;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1000 extern Lisp_Object Qbuffer_predicate, Qbuffer_list;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1001 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
1002 extern Lisp_Object Qfont;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1003 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
1004 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
1005 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
1006 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
1007 extern Lisp_Object Qmouse_color;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1008 extern Lisp_Object Qname, Qtitle;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1009 extern Lisp_Object Qparent_id;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1010 extern Lisp_Object Qunsplittable, Qvisibility;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1011 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
1012 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
1013 extern Lisp_Object Qscreen_gamma;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1014 extern Lisp_Object Qline_spacing;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1015 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
1016 extern Lisp_Object Qfullscreen;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1017
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1018 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
1019 extern Lisp_Object Qheight, Qwidth;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1020 extern Lisp_Object Qminibuffer, Qmodeline;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1021 extern Lisp_Object Qonly;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1022 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
1023 extern Lisp_Object Qvisible;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1024 extern Lisp_Object Qdisplay_type;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1025 extern Lisp_Object Qbackground_mode;
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 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
1028
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1029 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
1030 extern Lisp_Object Qdisplay;
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1031
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1032 #ifdef HAVE_WINDOW_SYSTEM
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1033
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1034 /* 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
1035 #define EMACS_CLASS "Emacs"
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 enum
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1038 {
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1039 /* 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
1040 FULLSCREEN_NONE = 0,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1041 FULLSCREEN_WIDTH = 1,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1042 FULLSCREEN_HEIGHT = 2,
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1043 FULLSCREEN_BOTH = 3,
78780
f78a0ea569ca (enum): Remove trailing comma.
Jan Djärv <jan.h.d@swipnet.se>
parents: 78260
diff changeset
1044 FULLSCREEN_WAIT = 4
50358
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1045 };
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 xterm.c, w32term.c, etc. */
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 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
1051 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
1052 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
1053
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1054 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
1055 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
1056
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1057
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1058 /* These are in frame.c */
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1059
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1060 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
1061 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
1062
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1063
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1064 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
1065
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1066 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
1067 int *, int *));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1068
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1069 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
1070 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
1071
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1072 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
1073 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
1074 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
1075 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
1076 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
1077 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
1078 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
1079 Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1080 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
1081 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
1082 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
1083 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
1084 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
1085 Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1086 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
1087 Lisp_Object));
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1088
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1089 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
1090
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1091 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
1092
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1093
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1094 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
1095
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1096 #endif /* HAVE_WINDOW_SYSTEM */
35c02b1585b3 (Qauto_raise, Qauto_lower, ...): Declare extern all frame
Kim F. Storm <storm@cua.dk>
parents: 49600
diff changeset
1097
35803
888df8063774 Change the include blocker to the same form as in other header
Gerd Moellmann <gerd@gnu.org>
parents: 35802
diff changeset
1098 #endif /* not EMACS_FRAME_H */
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 51665
diff changeset
1099
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 51665
diff changeset
1100 /* arch-tag: 0df048ee-e6bf-4f48-bd56-e3cd055dd8c4
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 51665
diff changeset
1101 (do not change this comment) */