gc_boehm_2 branch stats

[Vasily Chekalkin]

Hello.

Here I declare vict^W good start.

bacek at icering:~/src/parrot$ time ./parrot --gc ms ext/nqp-rx/nqp-rx.pbc 
fib2.nqp
Got grabage 1000000
fib(28) = 317811

real	0m12.887s
user	0m12.333s
sys	0m0.528s

bacek at icering:~/src/parrot$ time ./parrot --gc boehm 
ext/nqp-rx/nqp-rx.pbc fib2.nqp
Got grabage 1000000
fib(28) = 317811

real	0m9.509s
user	0m9.445s
sys	0m0.048s


fib2.nqp is

sub fib($n) {
     ($n < 2) ?? $n !! fib($n-1) + fib($n-2);
}

my $N := 28;

# Generate some long-lived garbage
my @garbage;
my $i := 1000000;
repeat {
     @garbage.push($i);
     $i--;
} while $i > 0;

pir::say("Got grabage " ~ + at garbage);

pir::say("fib($N) = " ~ fib($N));


Basically it's original fib.nqp from pmichaud's mail + a lot of garbage.

-- 
Bacek.