[perl #77646] [BUG] executing the same eval twice without an enclosing block

[Will Coleda via RT]

On Thu Sep 02 03:17:54 2010, smash wrote:
> IRC log:
> 
> 11:07 < smash> rakudo: eval "say 1" for 1..4;
> 11:07 <+p6eval> rakudo 27d54d: OUTPUT«1␤Null PMC in copy␤  in 'eval'
> at line 1117:CORE.setting␤  in main program body at line
> 22:/tmp/kyKDs6lmfi␤»
> 11:08 < smash> !?
> 11:11 < moritz_> rakudo: eval 'say 1' for 1..2
> 11:11 <+p6eval> rakudo 27d54d: OUTPUT«1␤Null PMC in copy␤  in 'eval'
> at line 1117:CORE.setting␤  in main program body at line
> 22:/tmp/v6wffwm3tF␤»
> 11:11 < moritz_> rakudo: eval 'say 1'; eval 'say 1'
> 11:11 -!- HarryS [h...@harry.lu] has joined #perl6
> 11:11 <+p6eval> rakudo 27d54d: OUTPUT«1␤1␤»
> 11:11 < moritz_> rakudo: sub e { eval 'say 1' }; e() for 1..2
> 11:11 <+p6eval> rakudo 27d54d: OUTPUT«1␤1␤»
> 11:12 < moritz_> rakudo: for 1..2 { eval 'say 1' }
> 11:12 <+p6eval> rakudo 27d54d: OUTPUT«1␤1␤»
> 11:12 < moritz_> this is most interesting
> 11:12 < moritz_> rakudo: eval '' for 1..2
> 11:12 <+p6eval> rakudo 27d54d: OUTPUT«Null PMC in copy␤  in 'eval' at
> line 1117:CORE.setting␤  in main program body at line
> 22:/tmp/Lspsx0wm8T␤»
> 11:13 < moritz_> executing the same eval twice without an enclosing
> block triggers this error
> 
> smash

This is now fixed:

21:38 < [Coke]> rakudo: eval "say 1" for 1..4
21:38 <+p6eval> rakudo 142c41: OUTPUT«1␤1␤1␤1␤»
21:38 < [Coke]> rakudo: eval '' for 1..2
21:38 <+p6eval> rakudo 142c41:  ( no output )

Closable with tests.

-- 
Will "Coke" Coleda