re_intuit_start(): move label after var decls
authorDavid Mitchell <davem@iabyn.com>
Thu, 6 Feb 2014 16:42:11 +0000 (16:42 +0000)
committerDavid Mitchell <davem@iabyn.com>
Sat, 8 Feb 2014 13:50:23 +0000 (13:50 +0000)
By moving a var initialisation to after its declaration, we can move a
label to after the var declarations, which allows us to remove a set of
braces and one level of indent. (We do the re-indent in the next commit)

regexec.c

index 54ebd36..b230df6 100644 (file)
--- a/regexec.c
+++ b/regexec.c
@@ -909,12 +909,13 @@ Perl_re_intuit_start(pTHX_
                     : prog->substrs->data[other_ix].substr)
     {
        /* Take into account the "other" substring. */
-      do_other_substr:
-       {
             char *last, *last1;
             char *s;
             SV* must;
-            struct reg_substr_datum *other = &prog->substrs->data[other_ix];
+            struct reg_substr_datum *other;
+
+          do_other_substr:
+            other = &prog->substrs->data[other_ix];
 
             /* if "other" is anchored:
              * we've previously found a floating substr starting at check_at.
@@ -1064,7 +1065,6 @@ Perl_re_intuit_start(pTHX_
                     other_last = HOP3c(s, 1, strend);
                 }
             }
-       }
     }
     else {
         DEBUG_OPTIMISE_MORE_r(