# New Ticket Created by  Will Coleda 
# Please include the string:  [perl #105368]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=105368 >


14:09 < [Coke]> my $foo = 42; ($foo, "stuff")[0] = 24; say $foo;14:10
< [Coke]> perl6: my $foo = 42; ($foo, "stuff")[0] = 24; say $foo;14:10
<+p6eval> pugs b927740: OUTPUT«*** Can't modify constant item: VRef
            <Scalar:0x7f41cc366fa1>␤    at /tmp/g6RkzZzOIu line 1,
column                15-38␤»14:10 <+p6eval> ..rakudo bef928:
OUTPUT«Cannot assign to a readonly variable or                a value␤
 in block <anon> at /tmp/eROaY_J02E:1␤  in <anon> at
/tmp/eROaY_J02E:1␤»14:10 <+p6eval> ..niecza v12-3-g193ca57:
OUTPUT«24␤»14:10 < [Coke]> b: my $foo = 42; ($foo, "stuff")[0] = 24;
say $foo;
14:10 <+p6eval> b 1b7dd1: OUTPUT«24␤»

This is a nom regression from b; test is in t/spec/S02-types/lists.t

There are other regressions in the file which may be related.

-- 
Will "Coke" Coleda

Reply via email to