view etc/custom/right.xpm @ 5273:799742b751c8

Accept circular lists where that is useful in #'mapcar*, #'map* and friends. src/ChangeLog addition: 2010-09-16 Aidan Kehoe <kehoea@parhasard.net> * fns.c (Flist_length): New, moved here from cl-extra.el, needed by the next function. (shortest_length_among_sequences): New. (Fmapconcat, FmapcarX, Fmapvector, Fmapcan, Fmapc, Fmap) (Fmap_into, Fsome, Fevery): Use shortest_length_among_sequences() when working out how many iterations to do, only giving circular list errors if all arguments are circular.
author Aidan Kehoe <kehoea@parhasard.net>
date Thu, 16 Sep 2010 20:34:49 +0100
parents 43dd3413c7c7
children 7910031dd78a
line wrap: on
line source

/* XPM */
static char * right_xpm[] = {
"10 10 5 1",
" 	c Gray90",
".	c Gray90",
"X	c none",
"o	c Gray75",
"O	c Gray40",
" .XXXXXXXX",
" ...XXXXXX",
"  ....XXXX",
"  oo....XX",
"  oooo....",
"  ooooOOOO",
"  ooOOOOXX",
"  OOOOXXXX",
" OOOXXXXXX",
" OXXXXXXXX"};