CHECKPATCH: Add --debug adv_checking
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>
This commit is contained in:
parent
a99ac041e9
commit
5424302e56
@ -98,6 +98,7 @@ my $dbg_possible = 0;
|
||||
my $dbg_type = 0;
|
||||
my $dbg_attr = 0;
|
||||
my $dbg_adv_dcs = 0;
|
||||
my $dbg_adv_checking = 0;
|
||||
for my $key (keys %debug) {
|
||||
## no critic
|
||||
eval "\${dbg_$key} = '$debug{$key}';";
|
||||
@ -2549,7 +2550,8 @@ sub process {
|
||||
|
||||
# Check the condition.
|
||||
my ($cond, $block) = @{$chunks[0]};
|
||||
#print "CHECKING<$linenr> cond<$cond> block<$block>\n";
|
||||
print "CHECKING<$linenr> cond<$cond> block<$block>\n"
|
||||
if $dbg_adv_checking;
|
||||
if (defined $cond) {
|
||||
substr($block, 0, length($cond), '');
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user