[perl #123777] [BUG] List assignment in a BEGIN block causes a crash at runtime

[via RT]

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


r: my @a; BEGIN { @a = 1; }; say @a;
rakudo-moar 0cb22e: OUTPUT«This type does not support elems␤  in method REIFY 
at src/gen/m-CORE.setting:9891␤  in method REIFY at 
src/gen/m-CORE.setting:10357␤  in method reify at src/gen/m-CORE.setting:8942␤  
in block  at src/gen/m-CORE.setting:8967␤  in method reify at s…»
..rakudo-parrot 0cb22e: OUTPUT«This type does not support elems␤  in method 
REIFY at gen/parrot/CORE.setting:9828␤  in method REIFY at 
gen/parrot/CORE.setting:10301␤  in method reify at 
gen/parrot/CORE.setting:8940␤  in block  at gen/parrot/CORE.setting:8927␤  in 
method reif…»

r: my @a; BEGIN { @a = 1; say @a; }; say @a; # works if you reify in the BEGIN 
block
rakudo-{parrot,moar} 0cb22e: OUTPUT«1␤1␤»

r: my %a; BEGIN { %a = 1 => 1 }; say %a; # works on hashes
rakudo-{parrot,moar} 0cb22e: OUTPUT«1 => 1␤»