test added by peschwa++, closing ticket.
--
Will "Coke" Coleda
On Sun May 27 20:48:46 2012, coke wrote:
> On Sun Jul 24 07:11:16 2011, masak wrote:
> > rakudo: role R { method foo { self.bar(42) }; method bar($x)
> {
> > say "OH HAI" } }; class C does R { method foo { self.R::foo } };
> > C.new.foo
> > rakudo 922500: OUTPUT«OH HAI»
> > rakudo: role R { met
On Sun Jul 24 07:11:16 2011, masak wrote:
> rakudo: role R { method foo { self.bar(42) }; method bar($x) {
> say "OH HAI" } }; class C does R { method foo { self.R::foo } };
> C.new.foo
> rakudo 922500: OUTPUT«OH HAI»
> rakudo: role R { method bar($x) {}; method foo { self.bar(42)
> } }; class
# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #95514]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org:443/rt3/Ticket/Display.html?id=95514 >
rakudo: role R { method foo { self.bar(42) }; method bar($x) {
say "OH HAI" } }; c