# New Ticket Created by  "Jimmy Zhuo" 
# Please include the string:  [perl #99362]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=99362 >


JimmyZ> rakudo: class A { has $!b = 10; }; sub foo($self) { $self!b }; say 
foo(A.new)
p6eval> rakudo 5be6d6: OUTPUT«Method 'find_private_method' not found for 
invocant of class 'Perl6::Metamodel::PackageHOW'␤ in method dispatch:<!> at 
src/gen/CORE.setting:653␤ in sub foo at /tmp/kOgqeqdh_O:1␤ in <anon> at 
/tmp/kOgqeqdh_O:1␤ in <anon> at /tmp/kOgqeqdh_O:1␤␤»
jnthn>  LTA error
jnthn>  Thogh it's correct that it doesn't work

JimmyZ> rakudo: class A { has $.b = 10; }; sub foo($self) { $.b }; say 
A.new.&foo
p6eval> rakudo 5be6d6: OUTPUT«Null PMC access in find_method('b')␤ in sub foo 
at /tmp/BM2KedbLm_:1␤ in method dispatch:<var> at src/gen/CORE.setting:640␤ in 
<anon> at /tmp/BM2KedbLm_:1␤ in <anon> at /tmp/BM2KedbLm_:1␤␤»

JimmyZ> rakudo: class A { has $.b = 10; }; sub foo($self) { $self.b }; say 
A.new.&foo       # this one works
p6eval> rakudo 5be6d6: OUTPUT«10␤»

Reply via email to