# New Ticket Created by Alex Varyanick
# Please include the string: [perl #77178]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=77178 >
# git rev-parse HEAD
69561ef449a81aee22189229e9724ea23565e6ee
13:22 < cono> rakudo: class A::B { has $.s = "hey" }; my $q = "B"; my
$l = gather { take "A::$q".new; }; $l[0].s.say
13:22 <+p6eval> rakudo 69561e: OUTPUT«Null PMC access in get_repr()
in <anon> at line 22:/tmp/kBN02ALah1 in
'List::at_pos' at line 1 in 'Any::postcircumfix:<[
]>' at line 1658:CORE.setting in main program body
at line 1»
13:22 < cono> Found how to reproduce ;)
13:22 < moritz_> rakudo: class A::B { has $.s = "hey" }; my $q = "B";
my $l = gather { take "A::$q".new; }; $l[0]
13:23 <+p6eval> rakudo 69561e: OUTPUT«Null PMC access in get_repr()
in <anon> at line 22:/tmp/Brx41cXyGM in
'List::at_pos' at line 1 in 'Any::postcircumfix:<[
]>' at line 1658:CORE.setting in main program body
at line 1»
13:23 < moritz_> rakudo: class A::B { has $.s = "hey" }; my $q = "B";
my $l = gather { take "A::$q".new; };
13:23 <+p6eval> rakudo 69561e: ( no output )
13:23 < moritz_> rakudo: class A::B { has $.s = "hey" }; my $q = "B";
my $l = gather { take "A::$q".new; }; $l.eager
13:23 <+p6eval> rakudo 69561e: OUTPUT«Null PMC access in get_repr()
in <anon> at line 22:/tmp/7avPB0sgCd in main
program body at line 1»
13:24 < cono> moritz_: it's only possible if prefix namespace present
A::, without it, all good
13:24 < cono> rakudo: class B { has $.s = "hey" }; my $q = "B"; my $l
= gather { take "$q".new; }; $l[0].s.say
13:24 <+p6eval> rakudo 69561e: OUTPUT«hey»
13:24 < gfldex> cono: [email protected]
--
Varyanick I. Alex
icq: 102 575 440
skype: cono..
[email protected]
