Algorithm-Permute
view release on metacpan or search on metacpan
IV r;
SV *aryref;
unsigned char *b; /* bitstring: array of bytes */
int state; /* state 0 / 1 / 2 */
int x;
int y;
} COMBINATION;
COMBINATION* init_combination(IV n, IV r, AV *av);
void free_combination(COMBINATION *c);
/* coollex pseudo-coroutine */
bool coollex(COMBINATION *c);
void coollex_visit(COMBINATION *c, SV **p_items);
#endif
( run in 0.264 second using v1.01-cache-2.11-cpan-3cd7ad12f66 )