[perl #116649] [BUG] [R/]= doesn't parse in Rakudo

[Carl Mäsak]

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


<TimToady> nr: sub r2cf(Rat $x is copy) { gather $x [R/]= 1 while ($x
-= take $x.floor) > 0 }; say r2cf(1.4142136)
<p6eval> rakudo 935c90: OUTPUT«===SORRY!===␤Preceding context expects
a term, but found infix = instead␤at /tmp/WXbDH1h_R_:1␤------> b
r2cf(Rat $x is copy) { gather $x [R/]=⏏ 1 while ($x -= take $x.floor)
> 0 }; sa␤»
<p6eval> ..niecza v24-18-gaf64300: OUTPUT«1 2 2 2 2 2 2 2 2 2 6 1 2 4 1 1 2␤»
<TimToady> dunno if you have that one yet
<masak> don't think so.
* masak submits TimToady's rakudobug
<masak> r: my $x; $x [R/]= 1
<p6eval> rakudo 935c90: OUTPUT«===SORRY!===␤Preceding context expects
a term, but found infix = instead␤at /tmp/95XYnmRMtC:1␤------> my $x;
$x [R/]=⏏ 1␤»