diff options
| author | Don Slutz <Don@CloudSwitch.com> | 2012-09-02 19:22:35 -0400 |
|---|---|---|
| committer | Blue Swirl <blauwirbel@gmail.com> | 2012-09-05 19:17:49 +0000 |
| commit | a99ac041e9f30dafb0afa326ddbeb8a481ba3f81 (patch) | |
| tree | e3aef1531490654c33ffa56815dbed26717c86b9 | |
| parent | f45ddd14209a4d1b95a4096d50a561b7f6270118 (diff) | |
CHECKPATCH: Add --debug adv_dcs
Add debug options to find this issue. They were not listed
in the help because the are not simple to understand the output of.
Signed-off-by: Don Slutz <Don@CloudSwitch.com>
Signed-off-by: Blue Swirl <blauwirbel@gmail.com>
| -rwxr-xr-x | scripts/checkpatch.pl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/scripts/checkpatch.pl b/scripts/checkpatch.pl index b98dc6cad1..0b0f3f379b 100755 --- a/scripts/checkpatch.pl +++ b/scripts/checkpatch.pl @@ -97,6 +97,7 @@ my $dbg_values = 0; my $dbg_possible = 0; my $dbg_type = 0; my $dbg_attr = 0; +my $dbg_adv_dcs = 0; for my $key (keys %debug) { ## no critic eval "\${dbg_$key} = '$debug{$key}';"; @@ -2575,6 +2576,8 @@ sub process { $allowed = 1; } } + print "DCS: level=$level block<$block> allowed=$allowed\n" + if $dbg_adv_dcs; if ($level == 0 && $block !~ /^\s*\{/ && !$allowed) { my $herectx = $here . "\n";; my $cnt = statement_rawlines($block); |