Fix precedence problem

p4raw-id: //depot/perl@29325

diff --git a/mg.c b/mg.c
index 67f1453..e4d7393 100644 (file)
--- a/mg.c
+++ b/mg.c
@@ -504,9 +504,9 @@ Perl_magic_regdata_cnt(pTHX_ SV *sv, MAGIC *mg)
                I32 paren = rx->lastparen;
 
                /* return the last filled */
-               while ( paren >= 0 &&
-                   rx->startp[paren] == -1 || rx->endp[paren] == -1)
-               paren--;
+               while ( paren >= 0
+                       && (rx->startp[paren] == -1 || rx->endp[paren] == -1) )
+                   paren--;
                return (U32)paren;
            }
        }