Fixed with 1ed284e2953382744b02058a , tests needed.

> On 31 May 2017, at 04:20, raiph (via RT) <perl6-bugs-follo...@perl.org> wrote:
> 
> # New Ticket Created by  raiph 
> # Please include the string:  [perl #131406]
> # in the subject line of all future correspondence about this issue. 
> # <URL: https://rt.perl.org/Ticket/Display.html?id=131406 >
> 
> 
> put $*PERL.compiler.version; # 2017.05.303.g.5.e.3393454
> 
> use NativeCall; put CArray[Pointer].^shortname;
> 
> displays 'Pointer]'  instead of expected 'CArray[Pointer]' or similar.
> 
> The 'CArray' is missing and so is the expected open square bracket.
> 
> timotimo++ noted that this is a problem in the
> Perl6::Metamodel::Naming method set_name, specifically the lines:
> 
> my @parts := nqp::split('::', $name);
> ...
> $!shortname := @parts ?? @parts[nqp::elems(@parts) - 1] !! '';
> 
> See https://irclog.perlgeek.de/perl6/2017-05-30#i_14662809 for some
> investigation into which commit appeared to introduce this bug.

Reply via email to