--doc makes stuff 8x slower

gistfile1.txt

┌─[tadzik@yavin4]─[~/src/nom] (nom)*
└─[%]─> cat dupa.pl 
DOC use Pod::To::Text;
use Test;

plan 1;
pod2text([]);
say 'alive';
┌─[tadzik@yavin4]─[~/src/nom] (nom)*
└─[%]─> time ./perl6 dupa.pl 
Could not find sub &plan
current instr.: '_block1002' pc 63 ((file unknown):61203592) (dupa.pl:4)
called from Sub '_block1000' pc 14 ((file unknown):61203542) (dupa.pl:1)
called from Sub 'nqp;HLL;Compiler;_block1773' pc 34028 (src/stage2/gen/NQPHLL.pir:10718) (src/stage2/gen/NQPHLL.pm:1261)
called from Sub 'nqp;HLL;Compiler;eval' pc 33877 (src/stage2/gen/NQPHLL.pir:10650) (src/stage2/gen/NQPHLL.pm:1254)
called from Sub 'nqp;HLL;Compiler;evalfiles' pc 36268 (src/stage2/gen/NQPHLL.pir:11607) (src/stage2/gen/NQPHLL.pm:1416)
called from Sub 'nqp;HLL;Compiler;command_eval' pc 35175 (src/stage2/gen/NQPHLL.pir:11160) (src/stage2/gen/NQPHLL.pm:1361)
called from Sub 'nqp;Perl6;Compiler;command_eval' pc 862 (src/gen/perl6-compiler.pir:312) (src/Perl6/Compiler.nqp:13)
called from Sub 'nqp;HLL;Compiler;command_line' pc 34847 (src/stage2/gen/NQPHLL.pir:11051) (src/stage2/gen/NQPHLL.pm:1346)
called from Sub 'MAIN' pc 715 (src/gen/perl6.pir:257) (src/main.nqp src/gen/main-version.nqp:28)
called from Sub '_block1000' pc 100 (src/gen/perl6.pir:69) (src/main.nqp src/gen/main-version.nqp:1)
./perl6 dupa.pl  1.04s user 0.11s system 99% cpu 1.157 total
┌─[tadzik@yavin4]─[~/src/nom] (nom)*
└─[%]─> time ./perl6 --doc dupa.pl

1..1
alive
# Looks like you planned 1 tests, but ran 0
./perl6 --doc dupa.pl  8.01s user 0.13s system 99% cpu 8.163 total