[perl #116613] Parent types augmented at run time no longer make augmented methods available to sub types

[Will Coleda via RT]

On Thu Jun 27 00:36:55 2013, FROGGS.de wrote:
> Here is a workaround that might imply a fix:
> 
> r: use MONKEY_TYPING; augment class Cool { method foo (*@) { "foo" } };
> say Int.foo;
> rakudo 5c0dae: OUTPUT«No such method 'foo' for invocant of type 'Int'␤ 
> in block  at /tmp/hBLEJlttbt:1␤␤»
> 
> # augment child classes
> r: use MONKEY_TYPING; augment class Cool { method foo (*@) { "foo" } };
> augment class Int { }; say Int.foo;
> rakudo 5c0dae: OUTPUT«foo␤»

Additionally:

14:17 < [Coke]> r: use MONKEY-TYPING; augment class Cool { method foo (*@) {
                "foo" } }; Cool.^compose; Int.^compose; say Int.foo
14:17 <+camelia> rakudo-{moar,jvm} 962197: OUTPUT«foo␤»

See also: http://irclog.perlgeek.de/perl6/2015-10-15#i_11379856

-- 
Will "Coke" Coleda