Longest palindromic substrings: Difference between revisions

m
→‎{{header|Raku}}: Don't bother check to see if a character is equal to itself. Pro tip: it is.
m (→‎{{header|REXX}}: fixed two typos.)
m (→‎{{header|Raku}}: Don't bother check to see if a character is equal to itself. Pro tip: it is.)
Line 626:
loop {
last if $i >= @chars;
for 01, 12 {
my int ($rev, $fwd) = $_, 01;
loop {
quietly last if ($rev > $i) or|| (($revi + $fwd) == @chars) &&|| (@chars[$i - $rev] ne @chars[$i + $fwd]);
$rev = $rev + 1;
$fwd = $fwd + 1;
10,333

edits