[perl #116893] [BUG] An alternation of literal strings doesn't backtrack properly in Rakudo

[Carl Mäsak]

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


<TimToady> nr: say "abcde" ~~ / | @(<a b bc cde>)+»/
<p6eval> niecza v24-23-g0520c7c: OUTPUT«｢abcde｣␤␤»
<p6eval> ..rakudo 9c59a1: OUTPUT«｢cde｣␤␤»
<TimToady> wow
<masak> what's that » doing there?
<masak> word boundary, right?
<TimToady> nod
<TimToady> forcing backtracking
<TimToady> which n does but r doesn't for the literals
<masak> so... Niecza is right on the first one?
<TimToady> yes, because nothing committed to the current LTM inside the @
* masak submits rakudobug