comparison src/gui-x.h @ 398:74fd4e045ea6 r21-2-29

Import from CVS: tag r21-2-29
author cvs
date Mon, 13 Aug 2007 11:13:30 +0200
parents c5d627a313b1
children 2f8bb876ab1d
comparison
equal deleted inserted replaced
397:f4aeb21a5bad 398:74fd4e045ea6
19 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, 19 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */ 20 Boston, MA 02111-1307, USA. */
21 21
22 /* Synched up with: Not in FSF. */ 22 /* Synched up with: Not in FSF. */
23 23
24 #ifndef _XEMACS_XLWLIB_H_ 24 #ifndef INCLUDED_gui_x_h_
25 #define _XEMACS_XLWLIB_H_ 25 #define INCLUDED_gui_x_h_
26 26
27 #include "../lwlib/lwlib.h" 27 #include "../lwlib/lwlib.h"
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
33 #ifdef HAVE_POPUPS
34 32
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.
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 */ 78 #endif /* INCLUDED_gui_x_h_ */
81
82 #endif /* _XEMACS_XLWLIB_H_ */