annotate etc/recycle.xpm @ 5553:62edcc6a11ec

Add an assertion about argument order to #'apply-partially compiler macro lisp/ChangeLog addition: 2011-08-24 Aidan Kehoe <kehoea@parhasard.net> * cl-macs.el (apply-partially): Add an assertion to this compiler macro, requiring that the order of the placeholders corresponding to the arguments in the constants vector of the constructed compiled function be the same as the order of the arguments to #'apply-partially. tests/ChangeLog addition: 2011-08-24 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el: Add a test of apply partially that depends on the relative order of its arguments.
author Aidan Kehoe <kehoea@parhasard.net>
date Wed, 24 Aug 2011 11:06:41 +0100
parents 7910031dd78a
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
1 /* XPM */
5413
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
2
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
3 /* This file is part of XEmacs.
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
4
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
5 XEmacs is free software: you can redistribute it and/or modify it
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
6 under the terms of the GNU General Public License as published by the
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
7 Free Software Foundation, either version 3 of the License, or (at your
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
8 option) any later version.
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
9
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
10 XEmacs is distributed in the hope that it will be useful, but WITHOUT
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
11 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
12 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
13 for more details.
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
14
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
15 You should have received a copy of the GNU General Public License
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
16 along with XEmacs. If not, see <http://www.gnu.org/licenses/>. */
7910031dd78a Add explicit GPLv3 or later to xpm and xbm graphics.
Mats Lidell <matsl@xemacs.org>
parents: 428
diff changeset
17
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
18 /* A recycle logo, artist unknown, converted to xpm by jwz */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
19 static char *recycle[] = {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
20 /* width height ncolors chars_per_pixel x_hot y_hot */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
21 " 51 51 4 1 26 23",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
22 /* colors */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
23 " c None m None",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
24 "# c black m black",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
25 "- c chartreuse1 m #7fff0f",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
26 "@ c chartreuse4 m #4f8f0f",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
27 /* pixels */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
28 " ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
29 " ################### ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
30 " ##------------##@@-@-## ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
31 " #-------------#@@@-@----# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
32 " #-------------#@@@-@------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
33 " #------------#@@@-@-------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
34 " #-------------##@-@---------# ### ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
35 " #------------# #-@----------# ##@## ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
36 " #-------------# #@------------##-## ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
37 " #------------# #---------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
38 " #-------------# #--------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
39 " #------------# #------------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
40 " #-------------# #------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
41 " ##----------# #----------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
42 " ##--------# ##---------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
43 " ##-----# ###-----------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
44 " ##---# ############## ### ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
45 " ############## ### ##--# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
46 " #------------## # ##-----# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
47 " ##-----------# ##-------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
48 " ##---------## ##----------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
49 " #----------# #------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
50 " #------------# #-------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
51 " #------------## #------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
52 " #--------------# #-------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
53 " #---------------# #------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
54 " #------------#--## #------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
55 " #-----------####-# #-----------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
56 " #-----------# ## ## #-----------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
57 " #---------# ## #---------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
58 " #---------# #-# #---------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
59 " #-------# #-# #-------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
60 " #-------# #--# #----@@## ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
61 " #-----############# #--############### ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
62 " #-----#@@@-@------# #----------------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
63 " #---#@@@-@-------# #---------------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
64 " #---#@@-@--------# #----------------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
65 " #-#@@-@---------# #---------------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
66 " #-#@@@----------# #----------------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
67 " #@@@-----------# #----------------# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
68 " #@@@-----------# #--------------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
69 " #@@-----------# #-------------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
70 " #------------# #-----------@# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
71 " ##----------# #---------@## ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
72 " ########### #--####### ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
73 " #--# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
74 " #-# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
75 " #-# ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
76 " ## ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
77 " ## ",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
78 " "
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
79 };