Mercurial > hg > xemacs-beta
annotate lwlib/lwlib-utils.h @ 5462:97ac18bd1fa3
Make sure distinct symbol macros with identical names expand distinctly.
lisp/ChangeLog addition:
2011-04-24 Aidan Kehoe <kehoea@parhasard.net>
* cl-macs.el (symbol-macrolet):
* cl-macs.el (lexical-let):
* cl.el:
* cl.el (cl-macroexpand):
Distinct symbol macros with identical string names should
nonetheless expand to different things; implement this, storing
the symbol's eq-hash in the macro environment, rather than its
string name.
tests/ChangeLog addition:
2011-04-24 Aidan Kehoe <kehoea@parhasard.net>
* automated/lisp-tests.el:
Check that distinct symbol macros with identical string names
expand to different things.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Sun, 24 Apr 2011 09:52:45 +0100 |
| parents | 8de8e3f6228a |
| children | ade4c7e2c6cb |
| rev | line source |
|---|---|
| 440 | 1 #ifndef INCLUDED_lwlib_utils_h_ |
| 2 #define INCLUDED_lwlib_utils_h_ | |
| 428 | 3 |
| 4 void destroy_all_children (Widget widget); | |
| 5 void XtNoClearRefreshWidget (Widget); | |
| 6 | |
| 7 typedef void (*XtApplyToWidgetsProc) (Widget, XtPointer); | |
| 8 typedef void* (*XtApplyUntilToWidgetsProc) (Widget, XtPointer); | |
| 9 | |
| 10 void XtApplyToWidgets (Widget, XtApplyToWidgetsProc, XtPointer); | |
| 11 void *XtApplyUntilToWidgets (Widget, XtApplyUntilToWidgetsProc, XtPointer); | |
| 12 | |
| 13 Widget *XtCompositeChildren (Widget, unsigned int *); | |
| 14 | |
| 15 /* returns True is the widget is being destroyed, False otherwise */ | |
| 16 Boolean | |
| 17 XtWidgetBeingDestroyedP (Widget widget); | |
| 18 | |
| 19 void XtSafelyDestroyWidget (Widget); | |
| 20 | |
| 21 #ifdef USE_DEBUG_MALLOC | |
| 22 #include <dmalloc.h> | |
| 23 #endif | |
| 440 | 24 |
| 25 #endif /* INCLUDED_lwlib_utils_h_ */ |