diff options
author | David Mitchell <davem@iabyn.com> | 2015-01-21 12:16:21 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2015-01-21 12:42:34 +0000 |
commit | 7b52d6569c115e4522e1cbe14cfd730e60c84bf1 (patch) | |
tree | adf749373ce41b8f5e7d28ffd31e161842f052a6 /regexec.c | |
parent | fa14274eb6699a6eabc280d644e7bdeaee02e336 (diff) | |
download | perl-7b52d6569c115e4522e1cbe14cfd730e60c84bf1.tar.gz |
avoid C labels in column 0
Generally the guideline is to outdent C labels (e.g. 'foo:') 2 columns
from the surrounding code.
If the label starts at column zero, then it means that diffs, such as
those generated by git, display the label rather than the function
name at the head of a diff block: which makes diffs harder to peruse.
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -3147,7 +3147,7 @@ Perl_regexec_flags(pTHX_ REGEXP * const rx, char *stringarg, char *strend, /* Failure. */ goto phooey; -got_it: + got_it: /* s/// doesn't like it if $& is earlier than where we asked it to * start searching (which can happen on something like /.\G/) */ if ( (flags & REXEC_FAIL_ON_UNDERFLOW) @@ -3187,7 +3187,7 @@ got_it: return 1; -phooey: + phooey: DEBUG_EXECUTE_r(PerlIO_printf(Perl_debug_log, "%sMatch failed%s\n", PL_colors[4], PL_colors[5])); @@ -7042,7 +7042,7 @@ NULL sayNO; NOT_REACHED; -yes: + yes: if (yes_state) { /* we have successfully completed a subexpression, but we must now * pop to the state marked by yes_state and continue from there */ @@ -7103,7 +7103,7 @@ yes: result = 1; goto final_exit; -no: + no: DEBUG_EXECUTE_r( PerlIO_printf(Perl_debug_log, "%*s %sfailed...%s\n", @@ -7111,7 +7111,7 @@ no: PL_colors[4], PL_colors[5]) ); -no_silent: + no_silent: if (no_final) { if (yes_state) { goto yes; |