# 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.