annotate src/frame.h @ 90109:790c49ba39db

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