[perl #74912] '++++$x' should die with error message

[Will Coleda via RT]

On Wed May 05 02:12:50 2010, jimmy wrote:
> > rakudo: my $x =3; say ++++$x
> > rakudo 1eef08: OUTPUT«5␤»
> 
> > rakudo: my $a = 2; $a++++.say;
> 
> > rakudo 1eef08: OUTPUT«Cannot assign to readonly value␤current 
> instr.: '&die' pc 17868 (src/builtins/Junction.pir:393)␤»
> 
> moritz_>  it should die like this in the first place
> moritz_> because ++$a returns should return an immutable integer
> 
> 
> 在此祝你身体健康，天天快乐
> 卓明亮
> 
> 
> 
>       

14:32 < [Coke]> rakudo: my $x =3; say ++++$x
14:32 <+p6eval> rakudo 356fe7: OUTPUT«Cannot assign to a readonly 
variable or a
                value␤  in sub prefix:<++> at 
src/gen/CORE.setting:2241␤  in
                block <anon> at /tmp/ufoahxjRzU:1␤  in <anon> at
                /tmp/ufoahxjRzU:1␤␤»

needs tests.

-- 
Will "Coke" Coleda