gistfile1.none

pmichaud@kiwi:~/nqp$ cat x
my $n := 1;
while $n <= 30 {
    say( pir::pow__NNN(2,$n) );
    $n := $n + 1;
}
0;
pmichaud@kiwi:~/nqp$ ./nqp x
2
4
8
16
32
64
128
256
512
1024
2048
4096
8192
16384
32768
65536
131072
262144
524288
1048576
2097152
4194304
8388608
16777216
33554432
67108864
134217728
268435456
536870912
1073741824
Cannot take substr outside string
current instr.: 'nqp;ModuleLoader;set_mainline_module' pc 2814 (src/stage2/gen/module_loader.pir:1054)
called from Sub '_block11' pc 178 ((file unknown):82)
called from Sub 'nqp;HLL;Compiler;_block1706' pc 36915 (src/stage2/gen/NQPHLL.pir:0)
called from Sub 'nqp;HLL;Compiler;eval' pc 36776 (src/stage2/gen/NQPHLL.pir:11459)
called from Sub 'nqp;HLL;Compiler;_block1959' pc 38849 (src/stage2/gen/NQPHLL.pir:12291)
called from Sub 'nqp;HLL;Compiler;evalfiles' pc 38684 (src/stage2/gen/NQPHLL.pir:12221)
called from Sub 'nqp;HLL;Compiler;command_line' pc 37930 (src/stage2/gen/NQPHLL.pir:11906)
called from Sub 'MAIN' pc 20212 (src/stage2/gen/NQP.pir:4594)
called from Sub '_block11' pc 190 (src/stage2/gen/NQP.pir:87)
pmichaud@kiwi:~/nqp$