Oops, we need an if instead a while here

timotimo++ for spotting. No noticeable performance difference, though
rakudo · Sep 23, 2015 · 3970634 · 3970634
1 parent c43ac75
commit 3970634
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core/Str.pm b/src/core/Str.pm
@@ -659,7 +659,7 @@ my class Str does Stringy { # declared in BOOTSTRAP
                 my int $nextpos;
                 my int $length;
 
-                while ($left = $!chars - $!pos) > 0 {
+                if ($left = $!chars - $!pos) > 0 {
                     $nextpos = nqp::findcclass(
                       nqp::const::CCLASS_NEWLINE, $!str, $!pos, $left);
 
@@ -905,7 +905,7 @@ my class Str does Stringy { # declared in BOOTSTRAP
                 my int $left;
                 my int $nextpos;
 
-                while ($left = $!chars - $!pos) > 0 {
+                if ($left = $!chars - $!pos) > 0 {
                     $nextpos = nqp::findcclass(
                       nqp::const::CCLASS_WHITESPACE, $!str, $!pos, $left);