annotate etc/custom/option.xpm @ 5305:09fed7053634
Handle slightly more complex type specifications, #'coerce, #'typep.
2010-11-17 Aidan Kehoe <kehoea@parhasard.net>
* cl-extra.el (coerce):
In the argument list, name the first argument OBJECT, not X; the
former name was always used in the doc string and is clearer.
Handle vector type specifications which include the length of the
target sequence, error if there's a mismatch.
* cl-macs.el (cl-make-type-test): Handle type specifications
starting with the symbol 'eql.
| author |
Aidan Kehoe <kehoea@parhasard.net> |
| date |
Wed, 17 Nov 2010 14:30:03 +0000 |
| parents |
5a88923fcbfe |
| children |
7910031dd78a |
| rev |
line source |
|
165
|
1 /* XPM */
|
|
|
2 static char *option[] = {
|
|
|
3 /* width height num_colors chars_per_pixel */
|
|
|
4 " 17 17 4 1",
|
|
|
5 /* colors */
|
|
|
6 ". c #000000",
|
|
|
7 "a c #a8b038",
|
|
|
8 "b c #f8f800",
|
|
|
9 "c s None c None",
|
|
|
10 /* pixels */
|
|
|
11 "ccccccccccccccccc",
|
|
|
12 "ccccccccccccccccc",
|
|
|
13 "cccccbbbbbbcccccc",
|
|
|
14 "ccccbbbbbbbbccccc",
|
|
|
15 "cccbbbaaaabbbcccc",
|
|
|
16 "ccbbbaaaaaabbbccc",
|
|
|
17 "cbbbaabbbaabbbbcc",
|
|
|
18 "cbbbaababaabbbbcc",
|
|
|
19 "cbbbbbbbaabbbbbcc",
|
|
|
20 "cbbbbbbaabbbbbbcc",
|
|
|
21 "cbbbbbbaabbbbbbcc",
|
|
|
22 "cbbbbbbbbbbbbbbcc",
|
|
|
23 "ccbbbbbaabbbbbccc",
|
|
|
24 "cccbbbbaabbbbcccc",
|
|
|
25 "ccccbbbbbbbbccccc",
|
|
|
26 "cccccbbbbbbcccccc",
|
|
|
27 "ccccccccccccccccc"
|
|
|
28 };
|
