[perl #77394] Rakudo ignores sigil-implied types for binding

[Will Coleda via RT]

On Mon Aug 23 13:23:18 2010, moritz wrote:
> fine:
> 
> 22:21 < moritz_> rakudo: my Str $a := 1
> 22:21 <+p6eval> rakudo 689bb7: OUTPUT«You cannot bind a variable of 
type
> Int() to a variable of type Str().␤  in 'infix:<:=>' at line
>      685:CORE.setting␤  in main program body at line
> 22:/tmp/22REpULr3l␤»
> 
> Bad:
> 
> 22:21 < moritz_> rakudo: my @a := 1; say @a ~~ Positional
> 22:21 <+p6eval> rakudo 689bb7: OUTPUT«0␤»
> 
> OH NOEZ!

This now fails:

10:29 < [Coke]> rakudo: my @a := 1; say @a ~~ Positional
10:29 < moritz> mls++
10:29 <+p6eval> rakudo 38165a: OUTPUT«Type check failed in binding␤  in 
block
                <anon> at /tmp/FTvvrgwEwx:1␤  in <anon> at 
/tmp/FTvvrgwEwx:1␤»

Closable with tests.

-- 
Will "Coke" Coleda