[perl #99732] [BUG] Rakudo doesn't like .++

[Carl Mäsak]

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


<TimToady> rakudo: $_ = "aaaa"; .++.say while 1
<p6eval> rakudo a979de: OUTPUT«===SORRY!===␤Method 'unshift' not found
for invocant of class 'Undef'␤»
<TimToady> o_O
<TimToady> b: $_ = "aaaa"; .++.say while 1
<p6eval> b 1b7dd1: OUTPUT«===SORRY!===␤Method 'unshift' not found for
invocant of class 'Undef'␤»
<TimToady> niecza: $_ = "aaaa"; .++.say while 1
<p6eval> niecza v9-32-g380d891:
OUTPUT«(timeout)aaaa␤aaab␤aaac␤aaad␤aaae␤aaaf␤aaag␤aaah␤aaai␤aaaj␤aaak␤aaal␤aaam␤aaan␤aaao␤aaap␤aaaq␤aaar␤aaas␤aaat␤aaau␤aaav␤aaaw␤aaax␤aaay␤aaaz␤aaba␤aabb␤aabc␤aabd␤aabe␤aabf␤aabg␤aabh␤aabi␤aabj␤aabk␤aabl␤aabm␤aabn␤aabo␤aabp␤aabq␤aabr␤aabs␤aabt␤aabu␤aabv␤aabw␤aab…
<TimToady> pugs: $_ = "aaaa"; .++.say while 1
<p6eval> pugs: 
OUTPUT«(timeout)aaaa␤aaab␤aaac␤aaad␤aaae␤aaaf␤aaag␤aaah␤aaai␤aaaj␤aaak␤aaal␤aaam␤aaan␤aaao␤aaap␤aaaq␤aaar␤aaas␤aaat␤aaau␤aaav␤aaaw␤aaax␤aaay␤aaaz␤aaba␤aabb␤aabc␤aabd␤aabe␤aabf␤aabg␤aabh␤aabi␤aabj␤aabk␤aabl␤aabm␤aabn␤aabo␤aabp␤aabq␤aabr␤aabs␤aabt␤aabu␤aabv␤aabw␤aabx␤aaby␤aabz␤aaca␤…
<TimToady> looks like rakudo has a long-standing bug here...
<TimToady> rakudo: $_ = "aaaa"; $_++.say while 1
<p6eval> rakudo a979de:
OUTPUT«(timeout)aaaa␤aaab␤aaac␤aaad␤aaae␤aaaf␤aaag␤aaah␤aaai␤aaaj␤aaak␤aaal␤aaam␤aaan␤aaao␤aaap␤aaaq␤aaar␤aaas␤aaat␤aaau␤aaav␤aaaw␤aaax␤aaay␤aaaz␤aaba␤aabb␤aabc␤aabd␤aabe␤aabf␤aabg␤aabh␤aabi␤aabj␤aabk␤aabl␤aabm␤aabn␤aabo␤aabp␤aabq␤aabr␤aabs␤aabt␤aabu␤aabv␤aabw␤aabx␤aaby␤a…
<TimToady> I guess rakudo doesn't like .++
<masak> rakudo: $_ = 4; .++; .say
<p6eval> rakudo a979de: OUTPUT«===SORRY!===␤Method 'unshift' not found
for invocant of class 'Undef'␤»
* masak submits rakudobug