Mercurial > hg > xemacs-beta
annotate lwlib/lwlib-utils.h @ 4719:bd51ab22afa8
Make it possible to silence warnings issued when #'mapcar's result is discarded.
lisp/ChangeLog addition:
2009-10-19 Aidan Kehoe <kehoea@parhasard.net>
* bytecomp.el (byte-compile-default-warnings):
Add two new warning types, discarded-consing (basically use of
mapcar instead of mapc where its result is discarded) and
quoted-lambda (use of a lambda expression quoted as data in a
function context).
(byte-compile-warnings): Document the new warnings.
(byte-compile-fset, byte-compile-funarg): Implement the
quoted-lambda warning option.
(byte-compile-mapcar): Renamed to byte-compile-maybe-mapc.
(byte-compile-maybe-mapc, byte-compile-maplist):
Implement the discarded-consing warning option.
Add more functions that should be compiled using
byte-compile-funarg, notably mapvector, mapc-internal,
map-char-table.
* cl-macs.el (mapcar*):
If we know at compile time that there are no CL options being
used, use the mapcar subr, not the byte-coded function.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Mon, 19 Oct 2009 12:47:21 +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_ */ |