sub add_test(int $n) {
    my $sum := 0;
    while nqp::isgt_i($n,1) {
        $sum := nqp::add_i($sum,$n); 
        $n := nqp::sub_i($n,1);
    }
    return $sum;
}

say(add_test(10));