From: Karl Williamson Date: Mon, 19 Feb 2018 18:57:37 +0000 (-0700) Subject: regcomp.c: White space only X-Git-Tag: v5.27.9~19 X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/60861a1d0e9b98624c7721ba13b988c1d973232c regcomp.c: White space only Fit in 80 columns, outdent because of removed enclosing block in a previous commit, consistent spacing around '+'. ilmari spotted the '+' spacing issues --- diff --git a/regcomp.c b/regcomp.c index 90e9332..864a1c7 100644 --- 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] == '<' /* (?()...) */ || RExC_parse[0] == '\'' ) /* (?('NAME')...) */ {