Copyright (C) 1994, 1995 Board of Trustees, University of Illinois.
Copyright (C) 1994, 1995 Free Software Foundation, Inc.
Copyright (C) 1995, 1996 Ben Wing
Copyright (C) 1994, 1995 Board of Trustees, University of Illinois.
Copyright (C) 1994, 1995 Free Software Foundation, Inc.
Copyright (C) 1995, 1996 Ben Wing
Given a device, frame, or window, return the associated device.
Return nil otherwise.
*/
Given a device, frame, or window, return the associated device.
Return nil otherwise.
*/
device-independence violations occur in faces.el. */
int first_x_device = NILP (Vdefault_x_device) && EQ (type, Qx);
#endif
device-independence violations occur in faces.el. */
int first_x_device = NILP (Vdefault_x_device) && EQ (type, Qx);
#endif
init_device_resources (d);
MAYBE_DEVMETH (d, finish_init_device, (d, props));
init_device_resources (d);
MAYBE_DEVMETH (d, finish_init_device, (d, props));
/* Next delete all frames which have the popup property to avoid
deleting a child after its parent. */
DEVICE_FRAME_LOOP (frmcons, d)
/* Next delete all frames which have the popup property to avoid
deleting a child after its parent. */
DEVICE_FRAME_LOOP (frmcons, d)
MARK_FRAME_GLYPHS_CHANGED (f);
MARK_FRAME_SUBWINDOWS_CHANGED (f);
MARK_FRAME_TOOLBARS_CHANGED (f);
MARK_FRAME_GLYPHS_CHANGED (f);
MARK_FRAME_SUBWINDOWS_CHANGED (f);
MARK_FRAME_TOOLBARS_CHANGED (f);
- return (MAYBE_INT_DEVMETH (decode_device (device),
- device_implementation_flags, ())
- & XDEVIMPF_IS_A_PRINTER) ? Qt : Qnil;
+ return DEVICE_PRINTER_P (decode_device (device)) ? Qt : Qnil;
}
DEFUN ("device-system-metric", Fdevice_system_metric, 1, 3, 0, /*
}
DEFUN ("device-system-metric", Fdevice_system_metric, 1, 3, 0, /*
size-icon-small Small icon dimensions.
size-device Device screen or paper size in pixels.
size-workspace Workspace size in pixels. This can be less than or
size-icon-small Small icon dimensions.
size-device Device screen or paper size in pixels.
size-workspace Workspace size in pixels. This can be less than or
- equal to the above. For diplays, this is the area
- available to applications less window manager
+ equal to the above. For displays, this is the area
+ available to applications less window manager
decorations. For printers, this is the size of
printable area.
offset-workspace Offset of workspace area from the top left corner
decorations. For printers, this is the size of
printable area.
offset-workspace Offset of workspace area from the top left corner
size-device-mm Device screen size in millimeters.
device-dpi Device resolution, in dots per inch.
num-bit-planes Integer, number of device bit planes.
size-device-mm Device screen size in millimeters.
device-dpi Device resolution, in dots per inch.
num-bit-planes Integer, number of device bit planes.
Lisp_Object winsy = domain_device_type (domain);
struct console_methods *meth = decode_console_type (winsy, ERROR_ME_NOT);
assert (meth);
Lisp_Object winsy = domain_device_type (domain);
struct console_methods *meth = decode_console_type (winsy, ERROR_ME_NOT);
assert (meth);
- return (MAYBE_INT_CONTYPE_METH (meth, device_implementation_flags, ())
- & XDEVIMPF_PIXEL_GEOMETRY);
+ return CONMETH_IMPL_FLAG (meth, XDEVIMPF_PIXEL_GEOMETRY);
}
DEFUN ("domain-device-type", Fdomain_device_type, 0, 1, 0, /*
}
DEFUN ("domain-device-type", Fdomain_device_type, 0, 1, 0, /*
/* reset the flag to 0 unless another notification occurred while
we were processing this one. Block SIGWINCH during this
check to prevent a possible race condition. */
/* reset the flag to 0 unless another notification occurred while
we were processing this one. Block SIGWINCH during this
check to prevent a possible race condition. */
EMACS_BLOCK_SIGNAL (SIGWINCH);
#endif
if (old_asynch_device_change_pending == asynch_device_change_pending)
asynch_device_change_pending = 0;
EMACS_BLOCK_SIGNAL (SIGWINCH);
#endif
if (old_asynch_device_change_pending == asynch_device_change_pending)
asynch_device_change_pending = 0;