This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regcomp.c: White space only
authorKarl Williamson <khw@cpan.org>
Mon, 19 Feb 2018 18:57:37 +0000 (11:57 -0700)
committerKarl Williamson <khw@cpan.org>
Tue, 20 Feb 2018 03:47:10 +0000 (20:47 -0700)
Fit in 80 columns, outdent because of removed enclosing block in a
previous commit, consistent spacing around '+'.

ilmari spotted the '+' spacing issues

regcomp.c

index 90e9332..864a1c7 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -11363,43 +11363,43 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I32 paren, I32 *flagp,U32 depth)
                                 || RExC_parse[1] == '<'
                                 || RExC_parse[1] == '{'))
                        || (       RExC_parse[0] == '*'        /* (?(*...)) */
-                            && (   memBEGINs(RExC_parse +1,
-                                             (Size_t) (RExC_end - (RExC_parse + 1)),
-                                             "pla:")
-                                || memBEGINs(RExC_parse +1,
-                                             (Size_t) (RExC_end - (RExC_parse + 1)),
-                                             "plb")
-                                || memBEGINs(RExC_parse +1,
-                                             (Size_t) (RExC_end - (RExC_parse + 1)),
-                                             "nla")
-                                || memBEGINs(RExC_parse +1,
-                                             (Size_t) (RExC_end - (RExC_parse + 1)),
-                                             "nlb")
-                                || memBEGINs(RExC_parse +1,
-                                             (Size_t) (RExC_end - (RExC_parse + 1)),
-                                             "positive_lookahead")
-                                || memBEGINs(RExC_parse +1,
-                                             (Size_t) (RExC_end - (RExC_parse + 1)),
-                                             "positive_lookbehind")
-                                || memBEGINs(RExC_parse +1,
-                                             (Size_t) (RExC_end - (RExC_parse + 1)),
-                                             "negative_lookahead")
-                                || memBEGINs(RExC_parse +1,
-                                             (Size_t) (RExC_end - (RExC_parse + 1)),
-                                             "negative_lookbehind"))))
-                    ) { /* Lookahead or eval. */
-                       I32 flag;
-                        regnode *tail;
-
-                       ret = reg_node(pRExC_state, LOGICAL);
-                       if (!SIZE_ONLY)
-                           ret->flags = 1;
-
-                        tail = reg(pRExC_state, 1, &flag, depth+1);
-                        RETURN_NULL_ON_RESTART(flag,flagp);
-                        REGTAIL(pRExC_state, ret, tail);
-                       goto insert_if;
-                   }
+                            && (   memBEGINs(RExC_parse + 1,
+                                         (Size_t) (RExC_end - (RExC_parse + 1)),
+                                         "pla:")
+                                || memBEGINs(RExC_parse + 1,
+                                         (Size_t) (RExC_end - (RExC_parse + 1)),
+                                         "plb")
+                                || memBEGINs(RExC_parse + 1,
+                                         (Size_t) (RExC_end - (RExC_parse + 1)),
+                                         "nla")
+                                || memBEGINs(RExC_parse + 1,
+                                         (Size_t) (RExC_end - (RExC_parse + 1)),
+                                         "nlb")
+                                || memBEGINs(RExC_parse + 1,
+                                         (Size_t) (RExC_end - (RExC_parse + 1)),
+                                         "positive_lookahead")
+                                || memBEGINs(RExC_parse + 1,
+                                         (Size_t) (RExC_end - (RExC_parse + 1)),
+                                         "positive_lookbehind")
+                                || memBEGINs(RExC_parse + 1,
+                                         (Size_t) (RExC_end - (RExC_parse + 1)),
+                                         "negative_lookahead")
+                                || memBEGINs(RExC_parse + 1,
+                                         (Size_t) (RExC_end - (RExC_parse + 1)),
+                                         "negative_lookbehind"))))
+                ) { /* Lookahead or eval. */
+                    I32 flag;
+                    regnode *tail;
+
+                    ret = reg_node(pRExC_state, LOGICAL);
+                    if (!SIZE_ONLY)
+                        ret->flags = 1;
+
+                    tail = reg(pRExC_state, 1, &flag, depth+1);
+                    RETURN_NULL_ON_RESTART(flag,flagp);
+                    REGTAIL(pRExC_state, ret, tail);
+                    goto insert_if;
+                }
                else if (   RExC_parse[0] == '<'     /* (?(<NAME>)...) */
                         || RExC_parse[0] == '\'' ) /* (?('NAME')...) */
                {