# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #57398] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=57398 >
$ svn info | grep Revi Revision: 29869 $ ./perl6 -e 'sub a($x) { $x = 5 }; my $y = 7; a($y);' Cannot assign to readonly variable [...] works, but the following works but segfaults: $ ./perl6 -e 'sub a($x) { $x = 5 }; my $y = 7; a($y);' Cannot assign to readonly variable current instr.: 'a' pc 138 (EVAL_14:59) called from Sub '_block11' pc 45 (EVAL_14:20) called from Sub 'parrot;PCT::HLLCompiler;eval' pc 806 (src/PCT/HLLCompiler.pir:481) called from Sub 'parrot;PCT::HLLCompiler;command_line' pc 1305 (src/PCT/HLLCompiler.pir:708) called from Sub 'parrot;Perl6::Compiler;main' pc 14623 (perl6.pir:172) perl6(33762) malloc: *** error for object 0x29c1250: double free *** set a breakpoint in malloc_error_break to debug Segmentation fault