e$BLZB<$G$9!#e(B
e$B$^$D$b$H$5$s%3%_%C%H$N0J2<$NFsE@$N=$@5$G!"e(BC99e$B$G$J$$e(BCe$B%3%s%Q%$%i$Ge(B
e$B%3%s%Q%$%k$G$-$J$/$J$C$F$$$^$9!#e(B
http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/array.c?r1=13588&r2=13590
rb_ary_permutation(VALUE ary, VALUE num)
{
RETURN_ENUMERATOR(ary, 1, &num); /* Return enumerator if no block
/
long r = NUM2LONG(num); / Permutation size from argument
*/
http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/array.c?r1=13591&r2=13598
static VALUE
rb_ary_product(int argc, VALUE argv, VALUE ary)
{
int n = argc+1; / How many arrays we’re operating on /
VALUE arrays[n]; / The arrays we’re computing the product of /
int counters[n]; / The current position in each one /
VALUE result; / The array we’ll be returning */
e$BA0<T$O%m!<%+%kJQ?t$N@k8@$NA0$K<B9TJ8e(B(do
{})e$B$,$"$k$?$a!"8e<T$Oe(B
e$B2DJQD9G[Ns$r;H$C$F$$$k$?$a$G$9$,!"A0<T$O$H$b$+$/8e<T$O$I$&$7$?$b$N$G$7$ge(B
e$B$&$+e(B?
e$B0B0W$Ke(B
alloca(e$B$+$=$N%i%C%Q!<e(B)e$B$r;H$&$H$^$?e(Bsegve$B$N85$K$J$k$G$7$g$&$7!#e(B