annotate etc/xemacs-icon3.xpm @ 5261:69f687b3ba9d

Move #'replace to C, add bounds-checking to it and to #'fill. 2010-09-06 Aidan Kehoe <kehoea@parhasard.net> Move #'replace to C; add bounds checking to it and to #'fill. * fns.c (Fsubseq, Ffill, mapcarX): Don't #'nreverse in #'subseq, use fill_string_range and check bounds in #'fill, use replace_string_range() in #'map-into avoiding quadratic time when modfiying the string. * fns.c (check_sequence_range, fill_string_range) (replace_string_range, replace_string_range_1, Freplace): New functions; check that arguments fit sequence dimensions, fill a string range with a given character, replace a string range from an Ibyte pointer.
author Aidan Kehoe <kehoea@parhasard.net>
date Mon, 06 Sep 2010 17:29:51 +0100
parents 376386a54a3c
children 7910031dd78a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1 /* XPM */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
2 static char * xemacs_xpm[] = {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
3 /* width height num_colors chars_per_pixel */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
4 "48 48 11 1",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
5 /* colors */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
6 " s None c none",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
7 ". c #e5e5e5",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
8 "X c #cccccc",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
9 "o c #b2b2b2",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
10 "O c #999999",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
11 "+ c #7f7f7f",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
12 "@ c #666666",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
13 "# c #4c4c4c",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
14 "$ c #323232",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
15 "% c #191919",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
16 "& c black",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
17 /* pixels */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
18 " ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
19 " ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
20 " ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
21 " ............ ......... ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
22 " XXXXXXXXXXXX. XXXXXXXXX. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
23 " ooooooooooooX oooooooooX ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
24 " OOOOOOOOOOOOo OOOOOOOOOo ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
25 " ++++++++++++O +++++++++O ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
26 " @@@@@@@@@@@@+.. @@@@@@@@@+ ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
27 " ############@XX. #########@ ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
28 " $$$$$$$$$$$$#ooX.$$$$$$$$$# ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
29 " %%%%%%%%%%%%$OOoX%%%%%%%%%$ ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
30 " &&&&&&&&&&&&%++Oo&&&&&&&&&% ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
31 " &&&&&&&&&&&&@@+Oo&&&&&&&&& ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
32 " &&&&&&$##@+OOoo&&&&Oo ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
33 " &&&&&%$$#@++OOo&&&+O ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
34 " &&&&%%$#@@++O&&&@+ ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
35 " &&&&&%$##@@+&&&#@ ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
36 " &&&&&%$$##@&&&$#.. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
37 " &&&&&%%$$#&&&%$XX. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
38 " &&&&&%%$&&&&%ooX.. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
39 " &&&&&&%$&&&&OOoXX. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
40 " &&&&&%&&&&++OooX.. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
41 " &&&&&&&&@@+OOoXX. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
42 " &&&&&&&##@++OooX. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
43 " &&&&&&$$#@@+OOoX.. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
44 " &&&&&%%$##@++OoXX. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
45 " &&&&&%$$#@@+OooX. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
46 " &&&&&&%%$##@+OOoX. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
47 " &&&&&&&&%$$#@++OoX.. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
48 " &&&&&&&&&%%$#@@+OoXX.. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
49 " &&&&#&&&&&&%$##@+OooXX.. ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
50 " &&&&$o&&&&&&%$$#@+OOooXX... ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
51 " &&&&%OoX&&&&&%%$#@++OOooXXX ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
52 " &&&&&+Oooo&&&&&%$#@@++OOooo ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
53 " &&&&@+OOO &&&&&%$##@@++OOO ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
54 " +&&&#@+++ &&&&%$$##@@+++ ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
55 " @&&&$#@@@ &&&&%%$$##@@@ ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
56 " #&&&%$### &&&&&%%$$### ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
57 " $&&&&%$$$ $&&&&&&%%$$$ ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
58 " %&&&&&%%% %&&&&&&&&%%% ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
59 " &&&&&&&&& &&&&&&&&&&&& ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
60 " ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
61 " ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
62 " ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
63 " ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
64 " ",
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
65 " "};