annotate etc/custom/option.xpm @ 5355:70b15ac66ee5
Correct a bug with circularity checking in #'mapcar*, #'map, etc.
src/ChangeLog addition:
2011-02-10 Aidan Kehoe <kehoea@parhasard.net>
* fns.c (shortest_length_among_sequences):
This was buggy, it always errored if the last argument was
circular, even if other arguments were non-circular. Correct that.
tests/ChangeLog addition:
2011-02-10 Aidan Kehoe <kehoea@parhasard.net>
* automated/lisp-tests.el:
* automated/lisp-tests.el (mapcar*):
If multiple SEQUENCE arguments are passed to #'mapcar*, and the
last one is circular while the others aren't, make sure that
#'mapcar* doesn't error.
| author |
Aidan Kehoe <kehoea@parhasard.net> |
| date |
Thu, 10 Feb 2011 08:46:10 +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 };
|
