/* Define frame-object for GNU Emacs.
Copyright (C) 1993, 1994, 1999, 2000, 2001, 2002, 2003, 2004,
- 2005, 2006, 2007 Free Software Foundation, Inc.
+ 2005, 2006, 2007, 2008 Free Software Foundation, Inc.
This file is part of GNU Emacs.
HBAR_CURSOR
};
+enum fullscreen_type
+{
+ /* Values used as a bit mask, BOTH == WIDTH | HEIGHT. */
+ FULLSCREEN_NONE = 0,
+ FULLSCREEN_WIDTH = 1,
+ FULLSCREEN_HEIGHT = 2,
+ FULLSCREEN_BOTH = 3,
+ FULLSCREEN_WAIT = 4
+};
+
+
#define FRAME_FOREGROUND_PIXEL(f) ((f)->foreground_pixel)
#define FRAME_BACKGROUND_PIXEL(f) ((f)->background_pixel)
struct terminal;
-#ifdef USE_FONT_BACKEND
struct font_driver_list;
-#endif /* USE_FONT_BACKEND */
struct frame
{
be used for output. */
unsigned glyphs_initialized_p : 1;
+ /* Set to non-zero in change_frame_size when size of frame changed
+ Clear the frame in clear_garbaged_frames if set. */
+ unsigned resized_p : 1;
+
+ /* Set to non-zero in when we want for force a flush_display in
+ update_frame, usually after resizing the frame. */
+ unsigned force_flush_display_p : 1;
+
+ /* Set to non-zero if the default face for the frame has been
+ realized. Reset to zero whenever the default face changes.
+ Used to see the difference between a font change and face change. */
+ unsigned default_face_done_p : 1;
+
+ /* Set to non-zero if this frame has already been hscrolled during
+ current redisplay. */
+ unsigned already_hscrolled_p : 1;
+
+ /* Set to non-zero when current redisplay has updated frame. */
+ unsigned updated_p : 1;
+
+ /* Set to non-zero to minimize tool-bar height even when
+ auto-resize-tool-bar is set to grow-only. */
+ unsigned minimize_tool_bar_window_p : 1;
+
#if defined (USE_GTK) || defined (MAC_OS)
/* Nonzero means using a tool bar that comes from the toolkit. */
int external_tool_bar;
}
output_data;
-#ifdef USE_FONT_BACKEND
/* List of font-drivers available on the frame. */
struct font_driver_list *font_driver_list;
-#endif /* USE_FONT_BACKEND */
+ /* List of data specific to font-driver and frame, but common to
+ faces. */
+ struct font_data_list *font_data_list;
/* Total width of fringes reserved for drawing truncation bitmaps,
continuation bitmaps and alike. The width is in canonical char
int left_fringe_width, right_fringe_width;
/* See FULLSCREEN_ enum below */
- int want_fullscreen;
+ enum fullscreen_type want_fullscreen;
/* Number of lines of menu bar. */
int menu_bar_lines;
#if defined (USE_X_TOOLKIT) || defined (HAVE_NTGUI) || defined (MAC_OS) \
|| defined (USE_GTK)
/* Nonzero means using a menu bar that comes from the X toolkit. */
- int external_menu_bar;
+ unsigned int external_menu_bar : 1;
#endif
/* Nonzero if last attempt at redisplay on this frame was preempted. */
- char display_preempted;
+ unsigned char display_preempted : 1;
/* visible is nonzero if the frame is currently displayed; we check
it to see if we should bother updating the frame's contents.
These two are mutually exclusive. They might both be zero, if the
frame has been made invisible without an icon. */
- char visible, iconified;
+ unsigned char visible : 2;
+ unsigned char iconified : 1;
+
+ /* Let's not use bitfields for volatile variables. */
/* Asynchronous input handlers change these, and
FRAME_SAMPLE_VISIBILITY copies them into visible and iconified.
/* True if frame actually has a minibuffer window on it.
0 if using a minibuffer window that isn't on this frame. */
- char has_minibuffer;
+ unsigned char has_minibuffer : 1;
/* 0 means, if this frame has just one window,
show no modeline for that window. */
- char wants_modeline;
+ unsigned char wants_modeline : 1;
/* Non-zero if the hardware device this frame is displaying on can
support scroll bars. */
char can_have_scroll_bars;
+ /* Non-0 means raise this frame to the top of the heap when selected. */
+ unsigned char auto_raise : 1;
+
+ /* Non-0 means lower this frame to the bottom of the stack when left. */
+ unsigned char auto_lower : 1;
+
+ /* True if frame's root window can't be split. */
+ unsigned char no_split : 1;
+
+ /* If this is set, then Emacs won't change the frame name to indicate
+ the current buffer, etcetera. If the user explicitly sets the frame
+ name, this gets set. If the user sets the name to Qnil, this is
+ cleared. */
+ unsigned char explicit_name : 1;
+
+ /* Nonzero if size of some window on this frame has changed. */
+ unsigned char window_sizes_changed : 1;
+
+ /* Nonzero if the mouse has moved on this display device
+ since the last time we checked. */
+ unsigned char mouse_moved :1;
+
/* If can_have_scroll_bars is non-zero, this is non-zero if we should
actually display them on this frame. */
enum vertical_scroll_bar_type vertical_scroll_bar_type;
/* Width of bar cursor (if we are using that) for blink-off state. */
int blink_off_cursor_width;
- /* Non-0 means raise this frame to the top of the heap when selected. */
- char auto_raise;
-
- /* Non-0 means lower this frame to the bottom of the stack when left. */
- char auto_lower;
-
- /* True if frame's root window can't be split. */
- char no_split;
-
- /* If this is set, then Emacs won't change the frame name to indicate
- the current buffer, etcetera. If the user explicitly sets the frame
- name, this gets set. If the user sets the name to Qnil, this is
- cleared. */
- char explicit_name;
-
- /* Nonzero if size of some window on this frame has changed. */
- char window_sizes_changed;
-
/* Storage for messages to this frame. */
char *message_buf;
/* The baud rate that was used to calculate costs for this frame. */
int cost_calculation_baud_rate;
- /* Nonzero if the mouse has moved on this display device
- since the last time we checked. */
- char mouse_moved;
-
/* Exponent for gamma correction of colors. 1/(VIEWING_GAMMA *
SCREEN_GAMMA) where viewing_gamma is 0.4545 and SCREEN_GAMMA is a
frame parameter. 0 means don't do gamma correction. */
/* Additional space to put between text lines on this frame. */
int extra_line_spacing;
- /* Set to non-zero in change_frame_size when size of frame changed
- Clear the frame in clear_garbaged_frames if set. */
- unsigned resized_p : 1;
-
- /* Set to non-zero in when we want for force a flush_display in
- update_frame, usually after resizing the frame. */
- unsigned force_flush_display_p : 1;
-
/* All display backends seem to need these two pixel values. */
unsigned long background_pixel;
unsigned long foreground_pixel;
-
- /* Set to non-zero if the default face for the frame has been
- realized. Reset to zero whenever the default face changes.
- Used to see the difference between a font change and face change. */
- unsigned default_face_done_p : 1;
-
- /* Set to non-zero if this frame has already been hscrolled during
- current redisplay. */
- unsigned already_hscrolled_p : 1;
-
- /* Set to non-zero when current redisplay has updated frame. */
- unsigned updated_p : 1;
-
- /* Set to non-zero to minimize tool-bar height even when
- auto-resize-tool-bar is set to grow-only. */
- unsigned minimize_tool_bar_window_p : 1;
};
#ifdef MULTI_KBOARD
#define FRAME_KBOARD(f) (&the_only_kboard)
#endif
+/* Return a pointer to the image cache of frame F. */
+#define FRAME_IMAGE_CACHE(F) ((F)->terminal->image_cache)
+
typedef struct frame *FRAME_PTR;
#define XFRAME(p) (eassert (FRAMEP(p)),(struct frame *) XPNTR (p))
extern Lisp_Object Qframep, Qframe_live_p;
extern Lisp_Object Qtty, Qtty_type;
extern Lisp_Object Qterminal, Qterminal_live_p;
+extern Lisp_Object Qnoelisp;
extern struct frame *last_nonminibuf_frame;
extern Lisp_Object Qleft, Qright, Qtop, Qbox;
extern Lisp_Object Qdisplay;
-extern Lisp_Object Qwindow_system;
-
#ifdef HAVE_WINDOW_SYSTEM
/* The class of this X application. */
#define EMACS_CLASS "Emacs"
-enum
-{
- /* Values used as a bit mask, BOTH == WIDTH | HEIGHT. */
- FULLSCREEN_NONE = 0,
- FULLSCREEN_WIDTH = 1,
- FULLSCREEN_HEIGHT = 2,
- FULLSCREEN_BOTH = 3,
- FULLSCREEN_WAIT = 4
-};
-
-
/* These are in xterm.c, w32term.c, etc. */
extern void x_set_scroll_bar_default_width P_ ((struct frame *));
HCoop / bpt / emacs.git / blobdiff