Some more discussion about this at: http://irclog.perlgeek.de/perl6-dev/2016-07-23#i_12894457
> On 28 Jul 2016, at 02:47, Damian Conway (via RT) > <perl6-bugs-follo...@perl.org> wrote: > > # New Ticket Created by Damian Conway > # Please include the string: [perl #128760] > # in the subject line of all future correspondence about this issue. > # <URL: https://rt.perl.org/Ticket/Display.html?id=128760 > > > >> perl6 --version > This is Rakudo version 2016.07.1 built on MoarVM version 2016.07 > implementing Perl 6.c. > > Adding a new postcircumfix operator increases compile-time by over 1 second > per operator definition. > For example: > > BEGIN my $start = now; > BEGIN { say "Compiling..." }; > INIT { say "Compiled after {now - $start} seconds"; } > END { say "Done after {now - $start} seconds"; } > > multi postcircumfix:« ⦋ ⦌ » (Any $prob, Any $state) { > $state => $prob > } > BEGIN { say "First definition after {now - $start} seconds"; } > > multi postcircumfix:« ⦋ ⦌ » (Numeric $prob, Any $state) { > $state => $prob > } > BEGIN { say "Second definition after {now - $start} seconds"; } > > multi postcircumfix:« ⦋ ⦌ » (Str $prob, Any $state) { > $state => $prob > } > BEGIN { say "Third definition after {now - $start} seconds"; } > > multi postcircumfix:« ⦋ ⦌ » (Int $prob, Any $state) { > $state => $prob > } > BEGIN { say "Fourth definition after {now - $start} seconds"; } > > say 0.5⦋'cat'⦌; > say 'cat'⦋0.5⦌; > say 'cat'⦋'cat'⦌; > say 1⦋'cat'⦌; > say 1⦋1⦌;
