Mercurial > emacs
annotate lwlib/lwlib-Xaw.h @ 16141:9cbc74969e46
Add #n=object, #n#, and #:symbol constructs to reader.
(readevalloop, read, Fread_from_string): Empty list of read objects before
read0 call.
(read1): New variable `uninterned_symbol', which controls how to make
symbols. Support #:, #n=object and #n#.
(make_symbol): New function, used in read1 to make uninterned symbols
(Fintern): Set `obarray' field of interned symbols.
(init_obarray): Explicit set `obarray' field of symbol `nil'.
(syms_of_lread): staticpro read_objects, the list of read objects.
author | Erik Naggum <erik@naggum.no> |
---|---|
date | Mon, 09 Sep 1996 02:30:05 +0000 |
parents | 8aa62a50270d |
children | 6ed38ee607e9 |
rev | line source |
---|---|
6302
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
1 #ifndef LWLIB_XAW_H |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
2 #define LWLIB_XAW_H |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
3 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
4 #include "lwlib-int.h" |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
5 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
6 extern widget_creation_entry xaw_creation_table []; |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
7 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
8 Widget |
6332
8aa62a50270d
entered into RCS
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6302
diff
changeset
|
9 xaw_create_dialog (); |
6302
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
10 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
11 Boolean |
6332
8aa62a50270d
entered into RCS
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6302
diff
changeset
|
12 lw_xaw_widget_p (); |
6302
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
13 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
14 void |
6332
8aa62a50270d
entered into RCS
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6302
diff
changeset
|
15 xaw_update_one_widget (); |
6302
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
16 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
17 void |
6332
8aa62a50270d
entered into RCS
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6302
diff
changeset
|
18 xaw_update_one_value (); |
6302
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
19 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
20 void |
6332
8aa62a50270d
entered into RCS
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6302
diff
changeset
|
21 xaw_destroy_instance (); |
6302
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
22 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
23 void |
6332
8aa62a50270d
entered into RCS
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6302
diff
changeset
|
24 xaw_popup_menu (); |
6302
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
25 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
26 void |
6332
8aa62a50270d
entered into RCS
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6302
diff
changeset
|
27 xaw_pop_instance (); |
6302
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
28 |
f407e83e1aa4
Initial revision
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
diff
changeset
|
29 #endif /* LWLIB_XAW_H */ |