[perl #77232] [BUG] Binary bitshift operators infix:<< +< >> and infix:<< +> >> have too loose a priority in Rakudo

[Carl Mäsak]

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


<masak> rakudo: say 48 + (0 +< 8); say (48 + 0) +< 8; say 48 + 0 +< 8;
# should equal former (since +< has multiplicative tightness), but
equals latter
<p6eval> rakudo f100e9: OUTPUT«48␤12288␤12288␤»
* masak submits rakudobug
<masak> rakudo: say 48 + 0 +> 8
<p6eval> rakudo f100e9: OUTPUT«0␤»
<masak> also wrong.

+< and +> are acting as if they were looser than +. Should be tighter by S03.