[perl #73460] [BUG] You can sneak a Block into a variable typed as a Whatever in Rakudo

[jn...@jnthn.net via RT]

On Tue Mar 09 03:14:37 2010, masak wrote:
> <moritz_> rakudo: my $x = *; say $x.WHAT
> <p6eval> rakudo de996e: OUTPUT«Block()␤»
> <moritz_> now that's... confusing
> <masak> nod.

Now:

> my $x = *; say $x.WHAT
Whatever()

> <moritz_> rakudo: say *.WHAT
> <p6eval> rakudo de996e: OUTPUT«Whatever()␤»

> say *.WHAT
Whatever()

> <masak> rakudo: say Block ~~ Whatever
> <p6eval> rakudo de996e: OUTPUT«0␤»

Still works as expected.

> <masak> rakudo: my Whatever $x = *; say $x.WHAT
> <p6eval> rakudo de996e: OUTPUT«Block()␤»

> my Whatever $x = *; say $x.WHAT
Whatever()

Given to moritz++ for test coverage of these.

Thanks,

Jonathan