Mercurial > hg > xemacs-beta

comparison src/gui-x.h @ 424:11054d720c21 r21-2-20

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-20
author cvs
date Mon, 13 Aug 2007 11:26:11 +0200
parents 697ef44129c6
children
comparison
equal deleted inserted replaced
423:28d9c139be4c 424:11054d720c21
28 28
29 widget_value *xmalloc_widget_value (void); 29 widget_value *xmalloc_widget_value (void);
30 30
31 LWLIB_ID new_lwlib_id (void); 31 LWLIB_ID new_lwlib_id (void);
32 32
33 #ifdef HAVE_POPUPS
34
35 /* Each frame has one of these, and they are also contained in 33 /* Each frame has one of these, and they are also contained in
36 Vpopup_callbacks. 34 Vpopup_callbacks.
37 It doesn't really need to be an lrecord (it's not lisp-accessible) 35 It doesn't really need to be an lrecord (it's not lisp-accessible)
38 but it makes marking slightly more modular. 36 but it makes marking slightly more modular.
39 */ 37 */
60 58
61 DECLARE_LRECORD (popup_data, struct popup_data); 59 DECLARE_LRECORD (popup_data, struct popup_data);
62 #define XPOPUP_DATA(x) XRECORD (x, popup_data, struct popup_data) 60 #define XPOPUP_DATA(x) XRECORD (x, popup_data, struct popup_data)
63 #define XSETPOPUP_DATA(x, p) XSETRECORD (x, p, popup_data) 61 #define XSETPOPUP_DATA(x, p) XSETRECORD (x, p, popup_data)
64 #define POPUP_DATAP(x) RECORDP (x, popup_data) 62 #define POPUP_DATAP(x) RECORDP (x, popup_data)
65 #define GC_POPUP_DATAP(x) GC_RECORDP (x, popup_data)
66 #define CHECK_POPUP_DATA(x) CHECK_RECORD (x, popup_data) 63 #define CHECK_POPUP_DATA(x) CHECK_RECORD (x, popup_data)
67 64
68 void gcpro_popup_callbacks (LWLIB_ID id); 65 void gcpro_popup_callbacks (LWLIB_ID id);
69 void ungcpro_popup_callbacks (LWLIB_ID id); 66 void ungcpro_popup_callbacks (LWLIB_ID id);
70 int popup_handled_p (LWLIB_ID id); 67 int popup_handled_p (LWLIB_ID id);
71 void free_popup_widget_value_tree (widget_value *wv); 68 void free_popup_widget_value_tree (widget_value *wv);
72 void popup_selection_callback (Widget widget, LWLIB_ID ignored_id, 69 void popup_selection_callback (Widget widget, LWLIB_ID ignored_id,
73 XtPointer client_data); 70 XtPointer client_data);
74 int button_item_to_widget_value (Lisp_Object desc, widget_value *wv, 71 int button_item_to_widget_value (Lisp_Object desc, widget_value *wv,
75 int allow_text_field_p, int no_keys_p); 72 int allow_text_field_p, int no_keys_p);
73 widget_value * gui_items_to_widget_values (Lisp_Object items);
76 Lisp_Object menu_name_to_accelerator (char *name); 74 Lisp_Object menu_name_to_accelerator (char *name);
77 char *menu_separator_style (CONST char *s); 75 char *menu_separator_style (CONST char *s);
78 Lisp_Object widget_value_unwind (Lisp_Object closure); 76 Lisp_Object widget_value_unwind (Lisp_Object closure);
79 77
80 #endif /* HAVE_POPUPS */
81
82 #endif /* _XEMACS_XLWLIB_H_ */ 78 #endif /* _XEMACS_XLWLIB_H_ */