Mercurial > emacs
annotate lwlib/lwlib-int.h @ 41266:c08a55ae8e5d
(calc-wrapper, calc-slow-wrapper)
(math-showing-full-precision, math-with-extra-prec, math-working)
(calc-with-default-simplification)
(calc-with-trail-buffer): Use backtick.
(Math-zerop, Math-integer-negp, Math-integer-posp, Math-negp)
(Math-looks-negp, Math-posp, Math-integerp, Math-natnump)
(Math-ratp, Math-realp, Math-anglep, Math-numberp, Math-scalarp)
(Math-vectorp, Math-messy-integerp, Math-objectp, Math-objvecp)
(Math-integer-neg, Math-equal, Math-lessp, Math-primp)
(Math-num-integerp, Math-bignum-test, Math-equal-int)
(Math-natnum-lessp, math-format-radix-digit): Change to `defsubst'.
(calc-record-compilation-date-macro): Deleted. Callers updated.
(math-format-radix-digit): Move to calc-bin.el.
Change all toplevel `setq' forms to `defvar' forms, and move them
before their first use. Use `when', `unless'. Remove trailing
periods from error forms. Add description and headers suggested by
Emacs Lisp coding conventions.
author | Colin Walters <walters@gnu.org> |
---|---|
date | Mon, 19 Nov 2001 07:35:49 +0000 |
parents | 6ed38ee607e9 |
children | 695cf19ef79e |
rev | line source |
---|---|
5626 | 1 #ifndef LWLIB_INTERNAL_H |
2 #define LWLIB_INTERNAL_H | |
3 | |
4 #include "lwlib.h" | |
5 | |
29466 | 6 extern char *safe_strdup __P ((const char *)); |
5626 | 7 |
8 typedef struct _widget_instance | |
9 { | |
10 Widget widget; | |
11 Widget parent; | |
12 Boolean pop_up_p; | |
13 struct _widget_info* info; | |
14 struct _widget_instance* next; | |
15 } widget_instance; | |
16 | |
17 typedef struct _widget_info | |
18 { | |
19 char* type; | |
20 char* name; | |
21 LWLIB_ID id; | |
22 widget_value* val; | |
23 Boolean busy; | |
24 lw_callback pre_activate_cb; | |
25 lw_callback selection_cb; | |
26 lw_callback post_activate_cb; | |
27336
397da07a6912
Add prototype for lw_get_widget_instance.
Gerd Moellmann <gerd@gnu.org>
parents:
14018
diff
changeset
|
27 lw_callback highlight_cb; |
5626 | 28 struct _widget_instance* instances; |
29 struct _widget_info* next; | |
30 } widget_info; | |
31 | |
32 typedef Widget | |
5706
75570af32e92
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
5626
diff
changeset
|
33 (*widget_creation_function) (); |
5626 | 34 |
35 typedef struct _widget_creation_entry | |
36 { | |
37 char* type; | |
38 widget_creation_function function; | |
39 } widget_creation_entry; | |
40 | |
41 /* update all other instances of a widget. Can be used in a callback when | |
14018 | 42 a widget has been used by the user */ |
5626 | 43 void |
29466 | 44 lw_internal_update_other_instances __P ((Widget, XtPointer, XtPointer)); |
5626 | 45 |
46 /* get the widget_value for a widget in a given instance */ | |
47 widget_value* | |
29466 | 48 lw_get_widget_value_for_widget __P ((widget_instance *, Widget)); |
5626 | 49 |
29466 | 50 widget_info *lw_get_widget_info __P ((LWLIB_ID)); |
51 widget_instance * lw_get_widget_instance __P ((Widget)); | |
8723 | 52 |
5626 | 53 #endif /* LWLIB_INTERNAL_H */ |