comparison src/device.c @ 1942:da8cdcec6dff

[xemacs-hg @ 2004-03-08 15:22:44 by james] frame.el synch with Emacs 21.3.
author james
date Mon, 08 Mar 2004 15:23:03 +0000
parents 01c57eb70ae9
children 04bc9d2f42c7
comparison
equal deleted inserted replaced
1941:0637d85c1dd1 1942:da8cdcec6dff
73 Qcolor_scrollbar, Qcolor_desktop, Qcolor_workspace, Qfont_default, 73 Qcolor_scrollbar, Qcolor_desktop, Qcolor_workspace, Qfont_default,
74 Qfont_menubar, Qfont_dialog, Qsize_cursor, Qsize_scrollbar, 74 Qfont_menubar, Qfont_dialog, Qsize_cursor, Qsize_scrollbar,
75 Qsize_menu, Qsize_toolbar, Qsize_toolbar_button, 75 Qsize_menu, Qsize_toolbar, Qsize_toolbar_button,
76 Qsize_toolbar_border, Qsize_icon, Qsize_icon_small, Qsize_device, 76 Qsize_toolbar_border, Qsize_icon, Qsize_icon_small, Qsize_device,
77 Qsize_workspace, Qoffset_workspace, Qsize_device_mm, Qdevice_dpi, 77 Qsize_workspace, Qoffset_workspace, Qsize_device_mm, Qdevice_dpi,
78 Qnum_bit_planes, Qnum_color_cells, Qmouse_buttons, Qswap_buttons, 78 Qnum_bit_planes, Qnum_color_cells, Qnum_screens, Qmouse_buttons,
79 Qshow_sounds, Qslow_device, Qsecurity; 79 Qsave_under, Qswap_buttons, Qshow_sounds, Qslow_device, Qsecurity,
80 Qbacking_store;
80 81
81 Lisp_Object Qdevicep, Qdevice_live_p; 82 Lisp_Object Qdevicep, Qdevice_live_p;
82 Lisp_Object Qcreate_device_hook; 83 Lisp_Object Qcreate_device_hook;
83 Lisp_Object Qdelete_device_hook; 84 Lisp_Object Qdelete_device_hook;
84 Lisp_Object Vdevice_class_list; 85 Lisp_Object Vdevice_class_list;
1108 of screen or paper, in pixels. 1109 of screen or paper, in pixels.
1109 size-device-mm Device screen size in millimeters. 1110 size-device-mm Device screen size in millimeters.
1110 device-dpi Device resolution, in dots per inch. 1111 device-dpi Device resolution, in dots per inch.
1111 num-bit-planes Integer, number of device bit planes. 1112 num-bit-planes Integer, number of device bit planes.
1112 num-color-cells Integer, number of device color cells. 1113 num-color-cells Integer, number of device color cells.
1114 num-screens Integer, number of device screens.
1113 1115
1114 FEATURES. This group reports various device features. If a feature is 1116 FEATURES. This group reports various device features. If a feature is
1115 present, integer 1 (one) is returned, if it is not present, then integer 1117 present, integer 1 (one) is returned, if it is not present, then integer
1116 0 (zero) is returned. If the system is unaware of the feature, then 1118 0 (zero) is returned. If the system is unaware of the feature, then
1117 DEFAULT is returned. 1119 DEFAULT is returned.
1165 FROB (offset_workspace); 1167 FROB (offset_workspace);
1166 FROB (size_device_mm); 1168 FROB (size_device_mm);
1167 FROB (device_dpi); 1169 FROB (device_dpi);
1168 FROB (num_bit_planes); 1170 FROB (num_bit_planes);
1169 FROB (num_color_cells); 1171 FROB (num_color_cells);
1172 FROB (num_screens);
1170 FROB (mouse_buttons); 1173 FROB (mouse_buttons);
1171 FROB (swap_buttons); 1174 FROB (swap_buttons);
1172 FROB (show_sounds); 1175 FROB (show_sounds);
1173 FROB (slow_device); 1176 FROB (slow_device);
1174 FROB (security); 1177 FROB (security);
1178 FROB (backing_store);
1179 FROB (save_under);
1175 else 1180 else
1176 invalid_constant ("Invalid device metric symbol", metric); 1181 invalid_constant ("Invalid device metric symbol", metric);
1177 1182
1178 res = DEVMETH_OR_GIVEN (d, device_system_metrics, (d, m), Qunbound); 1183 res = DEVMETH_OR_GIVEN (d, device_system_metrics, (d, m), Qunbound);
1179 return UNBOUNDP(res) ? default_ : res; 1184 return UNBOUNDP(res) ? default_ : res;
1228 FROB (offset_workspace); 1233 FROB (offset_workspace);
1229 FROB (size_device_mm); 1234 FROB (size_device_mm);
1230 FROB (device_dpi); 1235 FROB (device_dpi);
1231 FROB (num_bit_planes); 1236 FROB (num_bit_planes);
1232 FROB (num_color_cells); 1237 FROB (num_color_cells);
1238 FROB (num_screens);
1233 FROB (mouse_buttons); 1239 FROB (mouse_buttons);
1234 FROB (swap_buttons); 1240 FROB (swap_buttons);
1235 FROB (show_sounds); 1241 FROB (show_sounds);
1236 FROB (slow_device); 1242 FROB (slow_device);
1237 FROB (security); 1243 FROB (security);
1244 FROB (backing_store);
1245 FROB (save_under);
1238 1246
1239 return plist; 1247 return plist;
1240 1248
1241 #undef FROB 1249 #undef FROB
1242 } 1250 }
1413 /* Qcolor defined in general.c */ 1421 /* Qcolor defined in general.c */
1414 DEFSYMBOL (Qgrayscale); 1422 DEFSYMBOL (Qgrayscale);
1415 DEFSYMBOL (Qmono); 1423 DEFSYMBOL (Qmono);
1416 1424
1417 /* Device metrics symbols */ 1425 /* Device metrics symbols */
1426 DEFSYMBOL (Qbacking_store);
1418 DEFSYMBOL (Qcolor_default); 1427 DEFSYMBOL (Qcolor_default);
1419 DEFSYMBOL (Qcolor_select); 1428 DEFSYMBOL (Qcolor_select);
1420 DEFSYMBOL (Qcolor_balloon); 1429 DEFSYMBOL (Qcolor_balloon);
1421 DEFSYMBOL (Qcolor_3d_face); 1430 DEFSYMBOL (Qcolor_3d_face);
1422 DEFSYMBOL (Qcolor_3d_light); 1431 DEFSYMBOL (Qcolor_3d_light);
1444 DEFSYMBOL (Qsize_workspace); 1453 DEFSYMBOL (Qsize_workspace);
1445 DEFSYMBOL (Qoffset_workspace); 1454 DEFSYMBOL (Qoffset_workspace);
1446 DEFSYMBOL (Qsize_device_mm); 1455 DEFSYMBOL (Qsize_device_mm);
1447 DEFSYMBOL (Qnum_bit_planes); 1456 DEFSYMBOL (Qnum_bit_planes);
1448 DEFSYMBOL (Qnum_color_cells); 1457 DEFSYMBOL (Qnum_color_cells);
1458 DEFSYMBOL (Qnum_screens);
1449 DEFSYMBOL (Qdevice_dpi); 1459 DEFSYMBOL (Qdevice_dpi);
1450 DEFSYMBOL (Qmouse_buttons); 1460 DEFSYMBOL (Qmouse_buttons);
1461 DEFSYMBOL (Qsave_under);
1451 DEFSYMBOL (Qswap_buttons); 1462 DEFSYMBOL (Qswap_buttons);
1452 DEFSYMBOL (Qshow_sounds); 1463 DEFSYMBOL (Qshow_sounds);
1453 DEFSYMBOL (Qslow_device); 1464 DEFSYMBOL (Qslow_device);
1454 DEFSYMBOL (Qsecurity); 1465 DEFSYMBOL (Qsecurity);
1455 } 1466 }