428
+ − 1 /* Define frame-object for XEmacs.
+ − 2 Copyright (C) 1988, 1992, 1993, 1994 Free Software Foundation, Inc.
+ − 3
+ − 4 This file is part of XEmacs.
+ − 5
+ − 6 XEmacs is free software; you can redistribute it and/or modify it
+ − 7 under the terms of the GNU General Public License as published by the
+ − 8 Free Software Foundation; either version 2, or (at your option) any
+ − 9 later version.
+ − 10
+ − 11 XEmacs is distributed in the hope that it will be useful, but WITHOUT
+ − 12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ − 13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+ − 14 for more details.
+ − 15
+ − 16 You should have received a copy of the GNU General Public License
+ − 17 along with XEmacs; see the file COPYING. If not, write to
+ − 18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ − 19 Boston, MA 02111-1307, USA. */
+ − 20
+ − 21 /* Synched up with: FSF 19.30. */
+ − 22
440
+ − 23 #ifndef INCLUDED_frame_h_
+ − 24 #define INCLUDED_frame_h_
428
+ − 25
+ − 26 #ifdef HAVE_SCROLLBARS
+ − 27 #include "scrollbar.h"
+ − 28 #endif
+ − 29
+ − 30 #ifdef HAVE_TOOLBARS
+ − 31 #include "toolbar.h"
+ − 32 #endif
+ − 33
+ − 34 #include "device.h"
+ − 35 #include "glyphs.h"
+ − 36 #include "redisplay.h"
+ − 37
+ − 38 #define FRAME_TYPE_NAME(f) ((f)->framemeths->name)
+ − 39 #define FRAME_TYPE(f) ((f)->framemeths->symbol)
+ − 40
+ − 41 /******** Accessing / calling a frame method *********/
+ − 42
+ − 43 #define HAS_FRAMEMETH_P(f, m) HAS_CONTYPE_METH_P ((f)->framemeths, m)
+ − 44 #define FRAMEMETH(f, m, args) CONTYPE_METH ((f)->framemeths, m, args)
+ − 45 #define MAYBE_FRAMEMETH(f, m, args) \
+ − 46 MAYBE_CONTYPE_METH ((f)->framemeths, m, args)
+ − 47 #define FRAMEMETH_OR_GIVEN(f, m, args, given) \
+ − 48 CONTYPE_METH_OR_GIVEN((f)->framemeths, m, args, given)
+ − 49
+ − 50 struct frame
+ − 51 {
+ − 52 struct lcrecord_header header;
+ − 53
+ − 54 /* Methods for this frame's console. This can also be retrieved
+ − 55 through frame->device->console, but it's faster this way. */
+ − 56 struct console_methods *framemeths;
+ − 57
+ − 58 /* Size of text only area of this frame, excluding scrollbars,
+ − 59 toolbars and end of line glyphs. The size can be in characters
+ − 60 or pixels, depending on units in which window system resizes
+ − 61 its windows */
+ − 62 int height, width;
+ − 63
+ − 64 /* New height and width for pending size change, in the same units
+ − 65 as above. 0 if no change pending. */
+ − 66 int new_height, new_width;
+ − 67
+ − 68 /* Size of text-only are of the frame, in default font characters.
+ − 69 This may be inaccurate due to rounding error */
+ − 70 int char_height, char_width;
+ − 71
+ − 72 /* Size of the whole frame, including scrollbars, toolbars and end
+ − 73 of line glyphs, in pixels */
+ − 74 int pixheight, pixwidth;
+ − 75
+ − 76 #ifdef HAVE_TTY
+ − 77 /* The count of frame number. This applies to TTY frames only. */
+ − 78 int order_count;
+ − 79 #endif
+ − 80
442
+ − 81 /* Current page number for a printer frame. */
+ − 82 int page_number;
+ − 83
428
+ − 84 /* Width of the internal border. This is a line of background color
+ − 85 just inside the window's border. It is normally only non-zero on
+ − 86 X frames, but we put it here to avoid introducing window system
+ − 87 dependencies. */
+ − 88 int internal_border_width;
+ − 89
+ − 90 int modiff;
+ − 91
617
+ − 92 struct expose_ignore *subwindow_exposures;
+ − 93 struct expose_ignore *subwindow_exposures_tail;
428
+ − 94
+ − 95 #ifdef HAVE_SCROLLBARS
+ − 96 /* frame-local scrollbar information. See scrollbar.c. */
+ − 97 int scrollbar_y_offset;
+ − 98
+ − 99 /* cache of created scrollbars */
+ − 100 struct scrollbar_instance *sb_vcache;
+ − 101 struct scrollbar_instance *sb_hcache;
+ − 102 #endif
+ − 103
+ − 104 #ifdef HAVE_TOOLBARS
+ − 105 /* Size of toolbars as seen by redisplay. This is used to determine
+ − 106 whether to re-layout windows by a call to change_frame_size early
+ − 107 in redisplay_frame. */
647
+ − 108 int current_toolbar_size[4];
428
+ − 109 #endif
+ − 110
442
+ − 111 /* Size of gutters as seen by redisplay. This is used to determine
+ − 112 whether to re-layout windows by a call to change_frame_size early
+ − 113 in redisplay_frame. */
647
+ − 114 int current_gutter_bounds[4];
442
+ − 115
+ − 116 /* Dynamic arrays of display lines for gutters */
+ − 117 display_line_dynarr *current_display_lines[4];
+ − 118 display_line_dynarr *desired_display_lines[4];
428
+ − 119
+ − 120 /* A structure of auxiliary data specific to the device type.
+ − 121 struct x_frame is used for X window frames; defined in console-x.h */
+ − 122 void *frame_data;
+ − 123
+ − 124 #define FRAME_SLOT_DECLARATION
+ − 125 #define MARKED_SLOT(x) Lisp_Object x
+ − 126 #include "frameslots.h"
+ − 127
+ − 128 /* Nonzero if frame is currently displayed.
+ − 129 Mutually exclusive with iconified
+ − 130 JV: This now a tristate flag:
+ − 131 Value : Emacs meaning :f-v-p : X meaning
+ − 132 0 : not displayed : nil : unmapped
+ − 133 >0 : user can access it,needs repainting : t : mapped and visible
+ − 134 <0 : user can access it,needs no repainting : hidden :mapped and invisible
+ − 135 where f-v-p is the return value of frame-visible-p */
+ − 136 int visible;
+ − 137
+ − 138 /* one-bit flags: */
+ − 139
442
+ − 140 /* Is focusing onto this frame disabled? (Modal dialog boxes) */
+ − 141 unsigned int disabled :1;
+ − 142
428
+ − 143 /* Are we finished initializing? */
+ − 144 unsigned int init_finished :1;
+ − 145
+ − 146 /* Is frame marked for deletion? This is used in XSetErrorHandler(). */
+ − 147 unsigned int being_deleted :1;
+ − 148
+ − 149 /* Nonzero if last attempt at redisplay on this frame was preempted. */
+ − 150 unsigned int display_preempted :1;
+ − 151
+ − 152 /* Nonzero if window is currently iconified.
+ − 153 This and visible are mutually exclusive. */
+ − 154 unsigned int iconified :1;
+ − 155
+ − 156 /* Nonzero if this frame should be cleared and then redrawn.
+ − 157 Setting this will also effectively set frame_changed. */
+ − 158 unsigned int clear :1;
+ − 159
+ − 160 /* True if frame actually has a minibuffer window on it.
+ − 161 0 if using a minibuffer window that isn't on this frame. */
+ − 162 unsigned int has_minibuffer :1;
+ − 163
+ − 164 /* True if frame's root window can't be split. */
+ − 165 unsigned int no_split :1;
+ − 166
+ − 167 unsigned int top_toolbar_was_visible :1;
+ − 168 unsigned int bottom_toolbar_was_visible :1;
+ − 169 unsigned int left_toolbar_was_visible :1;
+ − 170 unsigned int right_toolbar_was_visible :1;
+ − 171 /* gutter visibility */
+ − 172 unsigned int top_gutter_was_visible :1;
+ − 173 unsigned int bottom_gutter_was_visible :1;
+ − 174 unsigned int left_gutter_was_visible :1;
+ − 175 unsigned int right_gutter_was_visible :1;
+ − 176
+ − 177 /* redisplay flags */
+ − 178 unsigned int buffers_changed :1;
+ − 179 unsigned int clip_changed :1;
+ − 180 unsigned int extents_changed :1;
+ − 181 unsigned int faces_changed :1;
+ − 182 unsigned int frame_changed :1;
+ − 183 unsigned int subwindows_changed :1;
+ − 184 unsigned int subwindows_state_changed :1;
+ − 185 unsigned int glyphs_changed :1;
+ − 186 unsigned int icon_changed :1;
+ − 187 unsigned int menubar_changed :1;
+ − 188 unsigned int modeline_changed :1;
+ − 189 unsigned int point_changed :1;
+ − 190 unsigned int size_changed :1;
+ − 191 unsigned int toolbar_changed :1;
+ − 192 unsigned int gutter_changed :1;
+ − 193 unsigned int windows_changed :1;
+ − 194 unsigned int windows_structure_changed :1;
+ − 195 unsigned int window_face_cache_reset :1; /* used by expose handler */
+ − 196 unsigned int echo_area_garbaged :1; /* used by Fredisplay_echo_area */
+ − 197 unsigned int size_slipped :1;
+ − 198
+ − 199 unsigned int size_change_pending :1;
+ − 200 unsigned int mirror_dirty :1;
+ − 201
+ − 202 /* flag indicating if any window on this frame is displaying a subwindow */
+ − 203 unsigned int subwindows_being_displayed :1;
+ − 204 };
+ − 205
+ − 206 EXFUN (Fdelete_frame, 2);
+ − 207 EXFUN (Fframe_iconified_p, 1);
+ − 208 EXFUN (Fframe_name, 1);
+ − 209 EXFUN (Fframe_property, 3);
+ − 210 EXFUN (Fmake_frame, 2);
+ − 211 EXFUN (Fmake_frame_visible, 1);
+ − 212 EXFUN (Fraise_frame, 1);
+ − 213 EXFUN (Fselect_frame, 1);
+ − 214 EXFUN (Fset_frame_pointer, 2);
+ − 215 EXFUN (Fset_frame_position, 3);
442
+ − 216 EXFUN (Fset_frame_properties, 2);
428
+ − 217 EXFUN (Fset_frame_size, 4);
+ − 218
+ − 219 extern Lisp_Object Qbackground_toolbar_color, Qbell_volume, Qborder_color;
+ − 220 extern Lisp_Object Qborder_width, Qbottom_toolbar_shadow_color;
+ − 221 extern Lisp_Object Qbottom_toolbar_shadow_pixmap, Qdelete_frame;
+ − 222 extern Lisp_Object Qdeselect_frame_hook, Qdrag_and_drop_functions, Qgc_pointer;
+ − 223 extern Lisp_Object Qiconic, Qinitially_unmapped, Qinter_line_space;
+ − 224 extern Lisp_Object Qinternal_border_width, Qinvisible, Qmap_frame_hook;
+ − 225 extern Lisp_Object Qminibuffer, Qmodeline_pointer, Qmouse_enter_frame_hook;
+ − 226 extern Lisp_Object Qmouse_leave_frame_hook, Qpointer_background;
+ − 227 extern Lisp_Object Qpointer_color, Qpopup, Qscrollbar_placement;
+ − 228 extern Lisp_Object Qselect_frame_hook, Qspace_pointer;
+ − 229 extern Lisp_Object Qsynchronize_minibuffers, Qtext_pointer;
+ − 230 extern Lisp_Object Qtoolbar_shadow_thickness, Qtop_toolbar_shadow_color;
+ − 231 extern Lisp_Object Qtop_toolbar_shadow_pixmap, Qunmap_frame_hook;
+ − 232 extern Lisp_Object Qunsplittable, Quse_backing_store, Qvisible, Qvisual_bell;
+ − 233 extern Lisp_Object Vframe_icon_title_format, Vframe_title_format;
+ − 234 extern Lisp_Object Vmouse_motion_handler;
+ − 235
+ − 236
+ − 237 DECLARE_LRECORD (frame, struct frame);
+ − 238 #define XFRAME(x) XRECORD (x, frame, struct frame)
+ − 239 #define XSETFRAME(x, p) XSETRECORD (x, p, frame)
617
+ − 240 #define wrap_frame(p) wrap_record (p, frame)
428
+ − 241 #define FRAMEP(x) RECORDP (x, frame)
+ − 242 #define CHECK_FRAME(x) CHECK_RECORD (x, frame)
+ − 243 #define CONCHECK_FRAME(x) CONCHECK_RECORD (x, frame)
+ − 244
+ − 245 #define CHECK_LIVE_FRAME(x) do { \
+ − 246 CHECK_FRAME (x); \
+ − 247 if (! FRAME_LIVE_P (XFRAME (x))) \
+ − 248 dead_wrong_type_argument (Qframe_live_p, (x)); \
+ − 249 } while (0)
+ − 250 #define CONCHECK_LIVE_FRAME(x) do { \
+ − 251 CONCHECK_FRAME (x); \
+ − 252 if (! FRAME_LIVE_P (XFRAME (x))) \
+ − 253 x = wrong_type_argument (Qframe_live_p, (x)); \
+ − 254 } while (0)
+ − 255
+ − 256 #define FRAME_TYPE_P(f, type) EQ (FRAME_TYPE (f), Q##type)
+ − 257
+ − 258 #ifdef ERROR_CHECK_TYPECHECK
442
+ − 259 INLINE_HEADER struct frame *
428
+ − 260 error_check_frame_type (struct frame * f, Lisp_Object sym);
442
+ − 261 INLINE_HEADER struct frame *
428
+ − 262 error_check_frame_type (struct frame * f, Lisp_Object sym)
+ − 263 {
+ − 264 assert (EQ (FRAME_TYPE (f), sym));
+ − 265 return f;
+ − 266 }
+ − 267 # define FRAME_TYPE_DATA(f, type) \
+ − 268 ((struct type##_frame *) error_check_frame_type (f, Q##type)->frame_data)
+ − 269 #else
+ − 270 # define FRAME_TYPE_DATA(f, type) \
+ − 271 ((struct type##_frame *) (f)->frame_data)
+ − 272 #endif
+ − 273
+ − 274 #define CHECK_FRAME_TYPE(x, type) \
+ − 275 do { \
+ − 276 CHECK_FRAME (x); \
+ − 277 if (!FRAME_TYPE_P (XFRAME (x), type)) \
+ − 278 dead_wrong_type_argument \
+ − 279 (type##_console_methods->predicate_symbol, x); \
+ − 280 } while (0)
+ − 281 #define CONCHECK_FRAME_TYPE(x, type) \
+ − 282 do { \
+ − 283 CONCHECK_FRAME (x); \
+ − 284 if (!FRAME_TYPE_P (XFRAME (x), type)) \
+ − 285 x = wrong_type_argument \
+ − 286 (type##_console_methods->predicate_symbol, x); \
+ − 287 } while (0)
+ − 288
442
+ − 289 #define FRAME_DISPLAY_P(frm) \
+ − 290 (DEVICE_DISPLAY_P (XDEVICE (FRAME_DEVICE (frm))))
+ − 291
+ − 292 #define CHECK_DISPLAY_FRAME(frm) \
+ − 293 do { \
+ − 294 CHECK_FRAME (frm); \
+ − 295 CHECK_LIVE_FRAME (frm); \
+ − 296 CHECK_DISPLAY_DEVICE (FRAME_DEVICE (XFRAME (frm))); \
+ − 297 } while (0)
+ − 298
+ − 299 #define CONCHECK_DISPLAY_FRAME(frm) \
+ − 300 do { \
+ − 301 CONCHECK_FRAME (frm); \
+ − 302 CONCHECK_LIVE_FRAME (frm); \
+ − 303 CONCHECK_DISPLAY_DEVICE (FRAME_DEVICE (XFRAME (frm))); \
+ − 304 } while (0)
+ − 305
+ − 306 #define FRAME_PRINTER_P(frm) \
+ − 307 (DEVICE_PRINTER_P (XDEVICE (FRAME_DEVICE (frm))))
+ − 308
+ − 309 #define CHECK_PRINTER_FRAME(frm) \
+ − 310 do { \
+ − 311 CHECK_FRAME (frm); \
+ − 312 CHECK_LIVE_FRAME (frm); \
+ − 313 CHECK_PRINTER_DEVICE (FRAME_DEVICE (XFRAME (frm))); \
+ − 314 } while (0)
+ − 315
+ − 316 #define CONCHECK_PRINTER_FRAME(frm) \
+ − 317 do { \
+ − 318 CONCHECK_FRAME (frm); \
+ − 319 CONCHECK_LIVE_FRAME (frm); \
+ − 320 CONCHECK_PRINTER_DEVICE (FRAME_DEVICE (XFRAME (frm))); \
+ − 321 } while (0)
+ − 322
428
+ − 323 /* #### These should be in the frame-*.h files but there are
+ − 324 too many places where the abstraction is broken. Need to
+ − 325 fix. */
+ − 326
+ − 327 #define FRAME_X_P(frm) CONSOLE_TYPESYM_X_P (FRAME_TYPE (frm))
+ − 328 #define CHECK_X_FRAME(z) CHECK_FRAME_TYPE (z, x)
+ − 329 #define CONCHECK_X_FRAME(z) CONCHECK_FRAME_TYPE (z, x)
+ − 330
462
+ − 331 #define FRAME_GTK_P(frm) CONSOLE_TYPESYM_GTK_P (FRAME_TYPE (frm))
+ − 332 #define CHECK_GTK_FRAME(z) CHECK_FRAME_TYPE (z, gtk)
+ − 333 #define CONCHECK_GTK_FRAME(z) CONCHECK_FRAME_TYPE (z, gtk)
+ − 334
428
+ − 335 #define FRAME_TTY_P(frm) CONSOLE_TYPESYM_TTY_P (FRAME_TYPE (frm))
+ − 336 #define CHECK_TTY_FRAME(z) CHECK_FRAME_TYPE (z, tty)
+ − 337 #define CONCHECK_TTY_FRAME(z) CONCHECK_FRAME_TYPE (z, tty)
+ − 338
+ − 339 #define FRAME_STREAM_P(frm) CONSOLE_TYPESYM_STREAM_P (FRAME_TYPE (frm))
+ − 340 #define CHECK_STREAM_FRAME(z) CHECK_FRAME_TYPE (z, stream)
+ − 341 #define CONCHECK_STREAM_FRAME(z) CONCHECK_FRAME_TYPE (z, stream)
+ − 342
+ − 343 #define FRAME_WIN_P(frm) CONSOLE_TYPESYM_WIN_P (FRAME_TYPE (frm))
+ − 344
+ − 345 extern int frame_changed;
+ − 346
+ − 347 #define MARK_FRAME_FACES_CHANGED(f) do { \
+ − 348 struct frame *mffc_f = (f); \
+ − 349 mffc_f->faces_changed = 1; \
+ − 350 mffc_f->modiff++; \
+ − 351 if (!NILP (mffc_f->device)) \
+ − 352 { \
+ − 353 struct device *mffc_d = XDEVICE (mffc_f->device); \
+ − 354 MARK_DEVICE_FACES_CHANGED (mffc_d); \
+ − 355 } \
+ − 356 else \
+ − 357 faces_changed = 1; \
+ − 358 } while (0)
+ − 359
+ − 360 #define MARK_FRAME_GLYPHS_CHANGED(f) do { \
+ − 361 struct frame *mfgc_f = (f); \
+ − 362 mfgc_f->glyphs_changed = 1; \
+ − 363 mfgc_f->modiff++; \
+ − 364 if (!NILP (mfgc_f->device)) \
+ − 365 { \
+ − 366 struct device *mfgc_d = XDEVICE (mfgc_f->device); \
+ − 367 MARK_DEVICE_GLYPHS_CHANGED (mfgc_d); \
+ − 368 } \
+ − 369 else \
+ − 370 glyphs_changed = 1; \
+ − 371 } while (0)
+ − 372
+ − 373 #define MARK_FRAME_SUBWINDOWS_CHANGED(f) do { \
+ − 374 struct frame *mfgc_f = (f); \
442
+ − 375 mfgc_f->subwindows_changed = 1; \
428
+ − 376 mfgc_f->modiff++; \
+ − 377 if (!NILP (mfgc_f->device)) \
+ − 378 { \
+ − 379 struct device *mfgc_d = XDEVICE (mfgc_f->device); \
+ − 380 MARK_DEVICE_SUBWINDOWS_CHANGED (mfgc_d); \
+ − 381 } \
+ − 382 else \
442
+ − 383 subwindows_changed = 1; \
428
+ − 384 } while (0)
+ − 385
+ − 386 #define MARK_FRAME_SUBWINDOWS_STATE_CHANGED(f) do { \
+ − 387 struct frame *mfgc_f = (f); \
442
+ − 388 mfgc_f->subwindows_state_changed = 1; \
428
+ − 389 mfgc_f->modiff++; \
+ − 390 if (!NILP (mfgc_f->device)) \
+ − 391 { \
+ − 392 struct device *mfgc_d = XDEVICE (mfgc_f->device); \
+ − 393 MARK_DEVICE_SUBWINDOWS_STATE_CHANGED (mfgc_d); \
+ − 394 } \
+ − 395 else \
+ − 396 subwindows_state_changed = 1; \
+ − 397 } while (0)
+ − 398
+ − 399 #define MARK_FRAME_TOOLBARS_CHANGED(f) do { \
+ − 400 struct frame *mftc_f = (f); \
+ − 401 mftc_f->toolbar_changed = 1; \
+ − 402 mftc_f->modiff++; \
+ − 403 if (!NILP (mftc_f->device)) \
+ − 404 { \
+ − 405 struct device *mftc_d = XDEVICE (mftc_f->device); \
+ − 406 MARK_DEVICE_TOOLBARS_CHANGED (mftc_d); \
+ − 407 } \
+ − 408 else \
+ − 409 toolbar_changed = 1; \
+ − 410 } while (0)
+ − 411
442
+ − 412 #define MARK_FRAME_GUTTERS_CHANGED(f) do { \
428
+ − 413 struct frame *mftc_f = (f); \
+ − 414 mftc_f->gutter_changed = 1; \
+ − 415 mftc_f->modiff++; \
+ − 416 if (!NILP (mftc_f->device)) \
+ − 417 { \
+ − 418 struct device *mftc_d = XDEVICE (mftc_f->device); \
442
+ − 419 MARK_DEVICE_GUTTERS_CHANGED (mftc_d); \
428
+ − 420 } \
+ − 421 else \
+ − 422 gutter_changed = 1; \
+ − 423 } while (0)
+ − 424
+ − 425 #define MARK_FRAME_SIZE_CHANGED(f) do { \
+ − 426 struct frame *mfsc_f = (f); \
+ − 427 mfsc_f->size_changed = 1; \
+ − 428 mfsc_f->size_change_pending = 1; \
+ − 429 mfsc_f->modiff++; \
+ − 430 if (!NILP (mfsc_f->device)) \
+ − 431 { \
+ − 432 struct device *mfsc_d = XDEVICE (mfsc_f->device); \
+ − 433 MARK_DEVICE_SIZE_CHANGED (mfsc_d); \
+ − 434 } \
+ − 435 else \
+ − 436 size_changed = 1; \
+ − 437 } while (0)
+ − 438
+ − 439 #define MARK_FRAME_CHANGED(f) do { \
+ − 440 struct frame *mfc_f = (f); \
+ − 441 mfc_f->frame_changed = 1; \
+ − 442 mfc_f->modiff++; \
+ − 443 if (!NILP (mfc_f->device)) \
+ − 444 { \
+ − 445 struct device *mfc_d = XDEVICE (mfc_f->device); \
+ − 446 MARK_DEVICE_FRAME_CHANGED (mfc_d); \
+ − 447 } \
+ − 448 else \
+ − 449 frame_changed = 1; \
+ − 450 } while (0)
+ − 451
+ − 452 #define MARK_FRAME_WINDOWS_CHANGED(f) do { \
+ − 453 struct frame *mfwc_f = (f); \
+ − 454 mfwc_f->windows_changed = 1; \
+ − 455 mfwc_f->modiff++; \
+ − 456 if (!NILP (mfwc_f->device)) \
+ − 457 { \
+ − 458 struct device *mfwc_d = XDEVICE (mfwc_f->device); \
+ − 459 MARK_DEVICE_WINDOWS_CHANGED (mfwc_d); \
+ − 460 } \
+ − 461 else \
+ − 462 windows_changed = 1; \
+ − 463 } while (0)
+ − 464
+ − 465 #define MARK_FRAME_WINDOWS_STRUCTURE_CHANGED(f) do { \
+ − 466 struct frame *fwsc_f = (f); \
+ − 467 fwsc_f->windows_structure_changed = 1; \
+ − 468 fwsc_f->modiff++; \
+ − 469 if (!NILP (fwsc_f->device)) \
+ − 470 { \
+ − 471 struct device *fwsc_d = XDEVICE (fwsc_f->device); \
+ − 472 MARK_DEVICE_WINDOWS_STRUCTURE_CHANGED (fwsc_d); \
+ − 473 } \
+ − 474 else \
+ − 475 windows_structure_changed = 1; \
+ − 476 invalidate_vertical_divider_cache_in_frame (fwsc_f); \
+ − 477 } while (0)
+ − 478
+ − 479 #define MARK_FRAME_SIZE_SLIPPED(f) do { \
+ − 480 struct frame *fwsc_f = (f); \
+ − 481 fwsc_f->size_slipped = 1; \
+ − 482 fwsc_f->modiff++; \
+ − 483 if (!NILP (fwsc_f->device)) \
+ − 484 { \
+ − 485 struct device *fwsc_d = XDEVICE (fwsc_f->device); \
+ − 486 MARK_DEVICE_FRAME_CHANGED (fwsc_d); \
+ − 487 } \
+ − 488 else \
+ − 489 frame_changed = 1; \
+ − 490 } while (0)
+ − 491
+ − 492 #define CLEAR_FRAME_SIZE_SLIPPED(f) do { \
+ − 493 struct frame *fwsc_f = (f); \
+ − 494 fwsc_f->size_slipped = 0; \
+ − 495 } while (0)
+ − 496
+ − 497 #define SET_FRAME_CLEAR(f) MARK_FRAME_CHANGED (f); (f)->clear = 1
+ − 498 #define FRAME_DEVICE(f) ((f)->device)
+ − 499 #define FRAME_CONSOLE(f) DEVICE_CONSOLE (XDEVICE (FRAME_DEVICE (f)))
617
+ − 500 #define FRAME_LIVE_P(f) (!EQ (FRAME_TYPE (f), Qdead))
428
+ − 501
+ − 502 #define FRAME_MINIBUF_ONLY_P(f) \
+ − 503 EQ (FRAME_ROOT_WINDOW (f), FRAME_MINIBUF_WINDOW (f))
442
+ − 504 #define FRAME_HAS_MINIBUF_P(f) ((f)->has_minibuffer)
+ − 505 #define FRAME_HEIGHT(f) ((f)->height)
+ − 506 #define FRAME_WIDTH(f) ((f)->width)
+ − 507 #define FRAME_CHARHEIGHT(f) ((f)->char_height)
+ − 508 #define FRAME_CHARWIDTH(f) ((f)->char_width)
+ − 509 #define FRAME_PIXHEIGHT(f) ((f)->pixheight)
+ − 510 #define FRAME_PIXWIDTH(f) ((f)->pixwidth)
+ − 511 #define FRAME_PAGENUMBER(f) ((f)->page_number + 0)
+ − 512 #define FRAME_SET_PAGENUMBER(f,x) (f)->page_number = (x);
428
+ − 513 #ifdef HAVE_SCROLLBARS
+ − 514 #define FRAME_SCROLLBAR_WIDTH(f) \
+ − 515 (NILP ((f)->vertical_scrollbar_visible_p) ? \
+ − 516 0 : XINT ((f)->scrollbar_width))
+ − 517 #define FRAME_SCROLLBAR_HEIGHT(f) \
+ − 518 (NILP ((f)->horizontal_scrollbar_visible_p) ? \
+ − 519 0 : XINT ((f)->scrollbar_height))
+ − 520 #else
+ − 521 #define FRAME_SCROLLBAR_WIDTH(f) 0
+ − 522 #define FRAME_SCROLLBAR_HEIGHT(f) 0
+ − 523 #endif
+ − 524
+ − 525 #define FW_FRAME(obj) \
+ − 526 (WINDOWP (obj) ? WINDOW_FRAME (XWINDOW (obj)) \
442
+ − 527 : (FRAMEP (obj) ? obj \
+ − 528 : Qnil))
428
+ − 529
+ − 530 #define FRAME_NEW_HEIGHT(f) ((f)->new_height)
+ − 531 #define FRAME_NEW_WIDTH(f) ((f)->new_width)
+ − 532 #define FRAME_CURSOR_X(f) ((f)->cursor_x)
+ − 533 #define FRAME_CURSOR_Y(f) ((f)->cursor_y)
+ − 534 #define FRAME_VISIBLE_P(f) ((f)->visible)
+ − 535 #define FRAME_REPAINT_P(f) ((f)->visible>0)
+ − 536 #define FRAME_NO_SPLIT_P(f) ((f)->no_split)
+ − 537 #define FRAME_ICONIFIED_P(f) ((f)->iconified)
+ − 538 #define FRAME_FOCUS_FRAME(f) ((f)->focus_frame)
+ − 539 #define FRAME_MINIBUF_WINDOW(f) ((f)->minibuffer_window)
+ − 540 #define FRAME_ROOT_WINDOW(f) ((f)->root_window)
+ − 541 /* Catch people attempting to set this. */
+ − 542 #define FRAME_SELECTED_WINDOW(f) NON_LVALUE ((f)->selected_window)
+ − 543 #define FRAME_LAST_NONMINIBUF_WINDOW(f) \
+ − 544 NON_LVALUE ((f)->last_nonminibuf_window)
+ − 545 #define FRAME_SB_VCACHE(f) ((f)->sb_vcache)
+ − 546 #define FRAME_SB_HCACHE(f) ((f)->sb_hcache)
442
+ − 547 #define FRAME_SUBWINDOW_CACHE(f) ((f)->subwindow_instance_cache)
428
+ − 548
+ − 549 #if 0 /* FSFmacs */
+ − 550
+ − 551 #define FRAME_VISIBLE_P(f) ((f)->visible != 0)
+ − 552 #define FRAME_SET_VISIBLE(f,p) \
+ − 553 ((f)->async_visible = (p), FRAME_SAMPLE_VISIBILITY (f))
+ − 554
+ − 555 /* Emacs's redisplay code could become confused if a frame's
+ − 556 visibility changes at arbitrary times. For example, if a frame is
+ − 557 visible while the desired glyphs are being built, but becomes
+ − 558 invisible before they are updated, then some rows of the
+ − 559 desired_glyphs will be left marked as enabled after redisplay is
+ − 560 complete, which should never happen. The next time the frame
+ − 561 becomes visible, redisplay will probably barf.
+ − 562
+ − 563 Currently, there are no similar situations involving iconified, but
+ − 564 the principle is the same.
+ − 565
+ − 566 So instead of having asynchronous input handlers directly set and
+ − 567 clear the frame's visibility and iconification flags, they just set
+ − 568 the async_visible and async_iconified flags; the redisplay code
+ − 569 calls the FRAME_SAMPLE_VISIBILITY macro before doing any redisplay,
+ − 570 which sets visible and iconified from their asynchronous
+ − 571 counterparts.
+ − 572
+ − 573 Synchronous code must use the FRAME_SET_VISIBLE macro.
+ − 574
+ − 575 Also, if a frame used to be invisible, but has just become visible,
+ − 576 it must be marked as garbaged, since redisplay hasn't been keeping
+ − 577 up its contents. */
+ − 578 #define FRAME_SAMPLE_VISIBILITY(f) \
+ − 579 (((f)->async_visible && ! (f)->visible) ? SET_FRAME_GARBAGED (f) : 0, \
+ − 580 (f)->visible = (f)->async_visible, \
+ − 581 (f)->iconified = (f)->async_iconified)
+ − 582
+ − 583 #endif /* FSFmacs */
+ − 584
+ − 585 #define FRAME_BORDER_WIDTH(f) ((f)->internal_border_width)
+ − 586 #define FRAME_BORDER_HEIGHT(f) ((f)->internal_border_width)
+ − 587
+ − 588 /* This returns the frame-local value; that tells you what you should
+ − 589 use when computing the frame size. It is *not* the actual toolbar
+ − 590 size because that depends on the selected window. Use the macros
+ − 591 below for that.
+ − 592 */
+ − 593
+ − 594 #ifdef HAVE_TOOLBARS
+ − 595 #define FRAME_RAW_THEORETICAL_TOOLBAR_VISIBLE(f, pos) \
+ − 596 (!NILP((f)->toolbar_buttons[pos]) && !NILP ((f)->toolbar_visible_p[pos]))
+ − 597 #define FRAME_RAW_THEORETICAL_TOOLBAR_SIZE(f, pos) \
+ − 598 (!NILP ((f)->toolbar_buttons[pos]) && INTP((f)->toolbar_size[pos]) ? \
+ − 599 (XINT ((f)->toolbar_size[pos])) : 0)
+ − 600 #define FRAME_RAW_THEORETICAL_TOOLBAR_BORDER_WIDTH(f, pos) \
+ − 601 (!NILP ((f)->toolbar_buttons[pos]) && INTP((f)->toolbar_border_width[pos]) ? \
+ − 602 (XINT ((f)->toolbar_border_width[pos])) : 0)
+ − 603 #else
+ − 604 #define FRAME_RAW_THEORETICAL_TOOLBAR_VISIBLE(f, pos) 0
+ − 605 #define FRAME_RAW_THEORETICAL_TOOLBAR_SIZE(f, pos) 0
+ − 606 #define FRAME_RAW_THEORETICAL_TOOLBAR_BORDER_WIDTH(f, pos) 0
+ − 607 #endif
+ − 608
+ − 609 #define FRAME_THEORETICAL_TOOLBAR_SIZE(f, pos) \
+ − 610 (FRAME_RAW_THEORETICAL_TOOLBAR_VISIBLE (f, pos) \
+ − 611 ? FRAME_RAW_THEORETICAL_TOOLBAR_SIZE (f, pos) \
+ − 612 : 0)
+ − 613
+ − 614 #define FRAME_THEORETICAL_TOP_TOOLBAR_HEIGHT(f) \
+ − 615 FRAME_THEORETICAL_TOOLBAR_SIZE (f, TOP_TOOLBAR)
+ − 616 #define FRAME_THEORETICAL_BOTTOM_TOOLBAR_HEIGHT(f) \
+ − 617 FRAME_THEORETICAL_TOOLBAR_SIZE (f, BOTTOM_TOOLBAR)
+ − 618 #define FRAME_THEORETICAL_LEFT_TOOLBAR_WIDTH(f) \
+ − 619 FRAME_THEORETICAL_TOOLBAR_SIZE (f, LEFT_TOOLBAR)
+ − 620 #define FRAME_THEORETICAL_RIGHT_TOOLBAR_WIDTH(f) \
+ − 621 FRAME_THEORETICAL_TOOLBAR_SIZE (f, RIGHT_TOOLBAR)
+ − 622
+ − 623 #define FRAME_THEORETICAL_TOOLBAR_BORDER_WIDTH(f, pos) \
442
+ − 624 (FRAME_RAW_THEORETICAL_TOOLBAR_VISIBLE (f, pos) \
428
+ − 625 ? FRAME_RAW_THEORETICAL_TOOLBAR_BORDER_WIDTH (f, pos) \
+ − 626 : 0)
+ − 627
+ − 628 #define FRAME_THEORETICAL_TOP_TOOLBAR_BORDER_WIDTH(f) \
+ − 629 FRAME_THEORETICAL_TOOLBAR_BORDER_WIDTH (f, TOP_TOOLBAR)
+ − 630 #define FRAME_THEORETICAL_BOTTOM_TOOLBAR_BORDER_WIDTH(f) \
+ − 631 FRAME_THEORETICAL_TOOLBAR_BORDER_WIDTH (f, BOTTOM_TOOLBAR)
+ − 632 #define FRAME_THEORETICAL_LEFT_TOOLBAR_BORDER_WIDTH(f) \
+ − 633 FRAME_THEORETICAL_TOOLBAR_BORDER_WIDTH (f, LEFT_TOOLBAR)
+ − 634 #define FRAME_THEORETICAL_RIGHT_TOOLBAR_BORDER_WIDTH(f) \
+ − 635 FRAME_THEORETICAL_TOOLBAR_BORDER_WIDTH (f, RIGHT_TOOLBAR)
+ − 636
+ − 637 /* This returns the window-local value rather than the frame-local value;
+ − 638 that tells you about what's actually visible rather than what should
+ − 639 be used when computing the frame size. */
+ − 640
+ − 641 #ifdef HAVE_TOOLBARS
+ − 642 #define FRAME_RAW_REAL_TOOLBAR_VISIBLE(f, pos) \
+ − 643 (HAS_DEVMETH_P (XDEVICE (FRAME_DEVICE (f)), initialize_frame_toolbars) \
+ − 644 && !NILP (XWINDOW (FRAME_LAST_NONMINIBUF_WINDOW (f))->toolbar_visible_p[pos]))
+ − 645 #define FRAME_RAW_REAL_TOOLBAR_BORDER_WIDTH(f, pos) \
+ − 646 ((INTP (XWINDOW \
+ − 647 (FRAME_LAST_NONMINIBUF_WINDOW (f))->toolbar_border_width[pos])) ? \
+ − 648 (XINT (XWINDOW \
+ − 649 (FRAME_LAST_NONMINIBUF_WINDOW (f))->toolbar_border_width[pos])) \
+ − 650 : 0)
+ − 651 #define FRAME_RAW_REAL_TOOLBAR_SIZE(f, pos) \
+ − 652 ((INTP (XWINDOW \
+ − 653 (FRAME_LAST_NONMINIBUF_WINDOW (f))->toolbar_size[pos])) ? \
+ − 654 (XINT (XWINDOW \
+ − 655 (FRAME_LAST_NONMINIBUF_WINDOW (f))->toolbar_size[pos])) : 0)
+ − 656 #define FRAME_REAL_TOOLBAR(f, pos) \
+ − 657 (XWINDOW (FRAME_LAST_NONMINIBUF_WINDOW (f))->toolbar[pos])
+ − 658 #else
+ − 659 #define FRAME_RAW_REAL_TOOLBAR_VISIBLE(f, pos) 0
+ − 660 #define FRAME_RAW_REAL_TOOLBAR_BORDER_WIDTH(f, pos) 0
+ − 661 #define FRAME_RAW_REAL_TOOLBAR_SIZE(f, pos) 0
+ − 662 #define FRAME_REAL_TOOLBAR(f, pos) Qnil
+ − 663 #endif
+ − 664
+ − 665 /* Note to Chuck
+ − 666 Note to Chuck
+ − 667 Note to Chuck:
+ − 668
+ − 669 The former definitions of FRAME_REAL_FOO_TOOLBAR_VISIBLE
+ − 670 looked at the toolbar data to see what was there. The
+ − 671 current ones look at the current values of the specifiers.
+ − 672 This is a semantic change; the former definition returned
+ − 673 what was *actually* there right at the moment, while the
+ − 674 current one returns what *ought* to be there once redisplay
+ − 675 has run to completion. I think this new definition is more
+ − 676 correct in almost all circumstances and is much less likely
+ − 677 to lead to strange race conditions. I'm not completely
+ − 678 sure that there aren't some places in the redisplay code
+ − 679 that use these macros and expect the former semantics, so
+ − 680 if you encounter some odd toolbar behavior, you might want
+ − 681 to look into this. --ben */
+ − 682
442
+ − 683 #define FRAME_REAL_TOOLBAR_VISIBLE(f, pos) \
+ − 684 ((!NILP (FRAME_REAL_TOOLBAR (f, pos)) \
+ − 685 && FRAME_RAW_REAL_TOOLBAR_SIZE (f, pos) > 0) \
+ − 686 ? FRAME_RAW_REAL_TOOLBAR_VISIBLE (f, pos) \
428
+ − 687 : 0)
442
+ − 688 #define FRAME_REAL_TOOLBAR_SIZE(f, pos) \
+ − 689 ((!NILP (FRAME_REAL_TOOLBAR (f, pos)) \
+ − 690 && FRAME_RAW_REAL_TOOLBAR_VISIBLE (f, pos)) \
+ − 691 ? FRAME_RAW_REAL_TOOLBAR_SIZE (f, pos) \
428
+ − 692 : 0)
+ − 693 #define FRAME_REAL_TOOLBAR_BORDER_WIDTH(f, pos) \
442
+ − 694 ((!NILP (FRAME_REAL_TOOLBAR (f, pos)) \
428
+ − 695 && FRAME_RAW_REAL_TOOLBAR_VISIBLE (f, pos)) \
+ − 696 ? FRAME_RAW_REAL_TOOLBAR_BORDER_WIDTH (f, pos) \
+ − 697 : 0)
+ − 698
+ − 699 #define FRAME_REAL_TOP_TOOLBAR_HEIGHT(f) \
+ − 700 FRAME_REAL_TOOLBAR_SIZE (f, TOP_TOOLBAR)
+ − 701 #define FRAME_REAL_BOTTOM_TOOLBAR_HEIGHT(f) \
+ − 702 FRAME_REAL_TOOLBAR_SIZE (f, BOTTOM_TOOLBAR)
+ − 703 #define FRAME_REAL_LEFT_TOOLBAR_WIDTH(f) \
+ − 704 FRAME_REAL_TOOLBAR_SIZE (f, LEFT_TOOLBAR)
+ − 705 #define FRAME_REAL_RIGHT_TOOLBAR_WIDTH(f) \
+ − 706 FRAME_REAL_TOOLBAR_SIZE (f, RIGHT_TOOLBAR)
+ − 707
+ − 708 #define FRAME_REAL_TOP_TOOLBAR_BORDER_WIDTH(f) \
+ − 709 FRAME_REAL_TOOLBAR_BORDER_WIDTH (f, TOP_TOOLBAR)
+ − 710 #define FRAME_REAL_BOTTOM_TOOLBAR_BORDER_WIDTH(f) \
+ − 711 FRAME_REAL_TOOLBAR_BORDER_WIDTH (f, BOTTOM_TOOLBAR)
+ − 712 #define FRAME_REAL_LEFT_TOOLBAR_BORDER_WIDTH(f) \
+ − 713 FRAME_REAL_TOOLBAR_BORDER_WIDTH (f, LEFT_TOOLBAR)
+ − 714 #define FRAME_REAL_RIGHT_TOOLBAR_BORDER_WIDTH(f) \
+ − 715 FRAME_REAL_TOOLBAR_BORDER_WIDTH (f, RIGHT_TOOLBAR)
+ − 716
+ − 717 #define FRAME_REAL_TOP_TOOLBAR_VISIBLE(f) \
+ − 718 FRAME_REAL_TOOLBAR_VISIBLE (f, TOP_TOOLBAR)
+ − 719 #define FRAME_REAL_BOTTOM_TOOLBAR_VISIBLE(f) \
+ − 720 FRAME_REAL_TOOLBAR_VISIBLE (f, BOTTOM_TOOLBAR)
+ − 721 #define FRAME_REAL_LEFT_TOOLBAR_VISIBLE(f) \
+ − 722 FRAME_REAL_TOOLBAR_VISIBLE (f, LEFT_TOOLBAR)
+ − 723 #define FRAME_REAL_RIGHT_TOOLBAR_VISIBLE(f) \
+ − 724 FRAME_REAL_TOOLBAR_VISIBLE (f, RIGHT_TOOLBAR)
+ − 725
442
+ − 726 #define FRAME_TOP_BORDER_START(f) \
+ − 727 (FRAME_REAL_TOP_TOOLBAR_HEIGHT (f) + \
428
+ − 728 2 * FRAME_REAL_TOP_TOOLBAR_BORDER_WIDTH (f))
442
+ − 729 #define FRAME_TOP_BORDER_END(f) \
428
+ − 730 (FRAME_TOP_BORDER_START (f) + FRAME_BORDER_HEIGHT (f))
+ − 731
442
+ − 732 #define FRAME_BOTTOM_BORDER_START(f) \
+ − 733 (FRAME_PIXHEIGHT (f) - FRAME_BORDER_HEIGHT (f) - \
+ − 734 FRAME_REAL_BOTTOM_TOOLBAR_HEIGHT (f) - \
428
+ − 735 2 * FRAME_REAL_BOTTOM_TOOLBAR_BORDER_WIDTH (f))
442
+ − 736 #define FRAME_BOTTOM_BORDER_END(f) \
+ − 737 (FRAME_PIXHEIGHT (f) - FRAME_REAL_BOTTOM_TOOLBAR_HEIGHT (f) - \
428
+ − 738 2 * FRAME_REAL_BOTTOM_TOOLBAR_BORDER_WIDTH (f))
+ − 739
442
+ − 740 #define FRAME_LEFT_BORDER_START(f) \
+ − 741 (FRAME_REAL_LEFT_TOOLBAR_WIDTH (f) + \
428
+ − 742 2 * FRAME_REAL_LEFT_TOOLBAR_BORDER_WIDTH (f))
442
+ − 743 #define FRAME_LEFT_BORDER_END(f) \
428
+ − 744 (FRAME_LEFT_BORDER_START (f) + FRAME_BORDER_WIDTH (f))
+ − 745
442
+ − 746 #define FRAME_RIGHT_BORDER_START(f) \
+ − 747 (FRAME_PIXWIDTH (f) - FRAME_BORDER_WIDTH (f) - \
+ − 748 FRAME_REAL_RIGHT_TOOLBAR_WIDTH(f) - \
428
+ − 749 2 * FRAME_REAL_RIGHT_TOOLBAR_BORDER_WIDTH (f))
442
+ − 750 #define FRAME_RIGHT_BORDER_END(f) \
+ − 751 (FRAME_PIXWIDTH (f) - FRAME_REAL_RIGHT_TOOLBAR_WIDTH (f) - \
428
+ − 752 2 * FRAME_REAL_RIGHT_TOOLBAR_BORDER_WIDTH(f))
+ − 753
+ − 754 /* Equivalent in FSF Emacs:
+ − 755
+ − 756 FOR_EACH_FRAME (LIST_VAR, FRAME_VAR) followed by a statement is a
+ − 757 `for' loop which iterates over the elements of Vframe_list. The
+ − 758 loop will set FRAME_VAR, a Lisp_Object, to each frame in
+ − 759 Vframe_list in succession and execute the statement. LIST_VAR
+ − 760 should be a Lisp_Object too; it is used to iterate through the
+ − 761 Vframe_list.
+ − 762 */
+ − 763
+ − 764 /* NO_BREAK means that "break" doesn't do what you think it does!
+ − 765 Use goto instead. "continue" is OK, though. */
+ − 766 #define FRAME_LOOP_NO_BREAK(frmcons, devcons, concons) \
+ − 767 DEVICE_LOOP_NO_BREAK (devcons, concons) \
+ − 768 DEVICE_FRAME_LOOP (frmcons, XDEVICE (XCAR (devcons)))
+ − 769
+ − 770 void update_frame_title (struct frame *f);
444
+ − 771 Lisp_Object next_frame (Lisp_Object, Lisp_Object, Lisp_Object);
+ − 772 Lisp_Object previous_frame (Lisp_Object, Lisp_Object, Lisp_Object);
428
+ − 773 void pixel_to_char_size (struct frame *f, int pixel_width, int pixel_height,
+ − 774 int *char_width, int *char_height);
+ − 775 void char_to_pixel_size (struct frame *f, int char_width, int char_height,
+ − 776 int *pixel_width, int *pixel_height);
+ − 777 void round_size_to_char (struct frame *f, int in_width, int in_height,
+ − 778 int *out_width, int *out_height);
+ − 779 void pixel_to_real_char_size (struct frame *f, int pixel_width, int pixel_height,
+ − 780 int *char_width, int *char_height);
+ − 781 void char_to_real_pixel_size (struct frame *f, int char_width, int char_height,
+ − 782 int *pixel_width, int *pixel_height);
+ − 783 void round_size_to_real_char (struct frame *f, int in_width, int in_height,
+ − 784 int *out_width, int *out_height);
+ − 785 void change_frame_size (struct frame *frame,
+ − 786 int newlength, int newwidth,
+ − 787 int delay);
+ − 788 void adjust_frame_size (struct frame *frame);
+ − 789 void frame_size_slipped (Lisp_Object specifier, struct frame *f,
+ − 790 Lisp_Object oldval);
+ − 791 void hold_frame_size_changes (void);
+ − 792 void unhold_one_frame_size_changes (struct frame *f);
+ − 793 void unhold_frame_size_changes (void);
+ − 794 void select_frame_1 (Lisp_Object frame);
+ − 795 void select_frame_2 (Lisp_Object frame);
+ − 796 struct frame *selected_frame (void);
+ − 797 struct frame *device_selected_frame (struct device *d);
+ − 798 struct frame *decode_frame (Lisp_Object frame);
+ − 799 struct frame *decode_frame_or_selected (Lisp_Object cdf);
+ − 800 Lisp_Object make_frame (struct frame *f);
+ − 801 int other_visible_frames (struct frame *f);
+ − 802 void delete_frame_internal (struct frame *f, int force,
+ − 803 int called_from_delete_device,
+ − 804 int from_io_error);
+ − 805 void io_error_delete_frame (Lisp_Object frame);
+ − 806 Lisp_Object find_some_frame (int (*predicate) (Lisp_Object, void *),
+ − 807 void *closure);
444
+ − 808 int device_matches_device_spec (Lisp_Object device, Lisp_Object device_spec);
428
+ − 809 Lisp_Object frame_first_window (struct frame *f);
+ − 810 int show_gc_cursor (struct frame *f, Lisp_Object cursor);
+ − 811 void set_frame_selected_window (struct frame *f, Lisp_Object window);
+ − 812 int is_surrogate_for_selected_frame (struct frame *f);
+ − 813 void update_frame_icon (struct frame *f);
+ − 814 void invalidate_vertical_divider_cache_in_frame (struct frame *f);
+ − 815
438
+ − 816 void init_frame (void);
+ − 817
440
+ − 818 #endif /* INCLUDED_frame_h_ */
