annotate etc/custom/right-pushed.xpm @ 5393:e99b473303e3
Use GC_EXTERNAL_LIST_LOOP_* where appropriate, fns.c
src/ChangeLog addition:
2011-04-04 Aidan Kehoe <kehoea@parhasard.net>
* lisp.h (GC_EXTERNAL_LIST_LOOP_3, GC_EXTERNAL_LIST_LOOP_4): New.
* fns.c (count_with_tail, list_position_cons_before, FassocX):
* fns.c (FrassocX, position, FdeleteX, FremoveX):
* fns.c (list_delete_duplicates_from_end):
* fns.c (Fdelete_duplicates, Fremove_duplicates, Freduce):
* fns.c (Fnsubstitute, Fsubstitute, sublis, nsublis, Fnsublis):
* fns.c (venn, nvenn, Funion, Fset_exclusive_or, Fnset_exclusive_or):
Use GC_EXTERNAL_LIST_LOOP_* in the sequence functions in fns.c
where appropriate, there were some corner cases where my old
approach was unsafe (mainly if the circularity checking's tortoise
lost GCPRO protection.
Add GC_EXTERNAL_LIST_LOOP_{3,4}, analogous to
GC_EXTERNAL_LIST_LOOP_2.
| author |
Aidan Kehoe <kehoea@parhasard.net> |
| date |
Mon, 04 Apr 2011 00:20:09 +0100 |
| parents |
43dd3413c7c7 |
| children |
7910031dd78a |
| rev |
line source |
|
155
|
1 /* XPM */
|
|
|
2 static char * right_xpm[] = {
|
|
|
3 "10 10 5 1",
|
|
|
4 " c Gray40",
|
|
|
5 ". c Gray40",
|
|
|
6 "X c none",
|
|
|
7 "o c Gray75",
|
|
|
8 "O c Gray90",
|
|
|
9 " .XXXXXXXX",
|
|
|
10 " ...XXXXXX",
|
|
|
11 " ....XXXX",
|
|
|
12 " oo....XX",
|
|
|
13 " oooo....",
|
|
|
14 " ooooOOOO",
|
|
|
15 " ooOOOOXX",
|
|
|
16 " OOOOXXXX",
|
|
|
17 " OOOXXXXXX",
|
|
|
18 " OXXXXXXXX"};
|
