annotate nt/ad2c.sed @ 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 4be1180a9e89
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
100
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
1 /^!/d
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
2 /^$/d
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
3 s/\\/\\\\/g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
4 s/\\$//g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
5 s/"/\\"/g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
6 s/^/(String) "/
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
7 : test
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
8 /\\$/b slash
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
9 s/$/",/
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
10 p
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
11 d
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
12 : slash
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
13 n
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
14 /^!/d
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
15 /^$/d
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
16 s/"/\\"/g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
17 s/\\\\/\\/g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
18 s/\\n/\\\\n/g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
19 s/\\t/\\\\t/g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
20 s/\\f/\\\\f/g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
21 s/\\b/\\\\b/g
4be1180a9e89 Import from CVS: tag r20-1b2
cvs
parents:
diff changeset
22 b test