Luke Palmer wrote:
> 
> Here's some much-needed cmp ops.
[snip]
> +=item B<cmp>(out INT, in NUM, in NUM)
[snip]
> +inline op cmp(out INT, in NUM, in INT) {

s/in INT/in NUM/;

-- 
$a=24;split//,240513;s/\B/ => /for@@=qw(ac ab bc ba cb ca
);{push(@b,$a),($a-=6)^=1 for 2..$a/6x--$|;print "[EMAIL PROTECTED]
]\n";((6<=($a-=6))?$a+=$_[$a%6]-$a%6:($a=pop @b))&&redo;}

Reply via email to