[perl #77520] [BUG] Internal Parrot error when introspecting the signature of an &assuming'd code block in Rakudo

[Will Coleda via RT]

On Mon Aug 30 08:22:27 2010, masak wrote:
> <TimToady> rakudo: say { $^x }.assuming(1).signature
> <p6eval> rakudo 6ccdcd: OUTPUT«get_attr_str() not implemented in class
> 'Sub' [...]
> <moritz_> rakudo: say { $^x }.assuming(1).signature.perl
> <p6eval> rakudo 6ccdcd: OUTPUT«get_attr_str() not implemented in class
> 'Sub' [...]
> * masak submits a rakudobug for the get_attr_str() error
> <masak> rakudo: say (-> { "!" }).signature.perl
> <p6eval> rakudo 6ccdcd: OUTPUT«:()␤»

New failure: 

20:22 < [Coke]> rakudo: say { $^x }.assuming(1).signature
20:22 <+p6eval> rakudo 38165a: OUTPUT«Method 'assuming' not found for invocant
                of class 'Block'␤  in block <anon> at /tmp/sGW5kK1mNs:1␤  in
                <anon> at /tmp/sGW5kK1mNs:1␤»


-- 
Will "Coke" Coleda