aboutsummaryrefslogtreecommitdiffstats
path: root/scripts
diff options
context:
space:
mode:
authorAndy Whitcroft <apw@shadowen.org>2008-10-16 01:02:17 -0400
committerLinus Torvalds <torvalds@linux-foundation.org>2008-10-16 14:21:35 -0400
commita1ef277e2c88c80cfa00580469133e2215442c8d (patch)
treed5306eda9a9d765fc05af689c7e0611a7b33e593 /scripts
parent1bdab9e5881fde3bf66528db5b91477ce4b35b3b (diff)
checkpatch: add tests for the attribute matcher
Add support for direct testing of the attribute matcher, add basic tests for it. Signed-off-by: Andy Whitcroft <apw@shadowen.org> Signed-off-by: Andrew Morton <akpm@linux-foundation.org> Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>
Diffstat (limited to 'scripts')
-rwxr-xr-xscripts/checkpatch.pl10
1 files changed, 10 insertions, 0 deletions
diff --git a/scripts/checkpatch.pl b/scripts/checkpatch.pl
index c6782ac6f130..1c032b1fa9eb 100755
--- a/scripts/checkpatch.pl
+++ b/scripts/checkpatch.pl
@@ -66,6 +66,7 @@ if ($#ARGV < 0) {
66my $dbg_values = 0; 66my $dbg_values = 0;
67my $dbg_possible = 0; 67my $dbg_possible = 0;
68my $dbg_type = 0; 68my $dbg_type = 0;
69my $dbg_attr = 0;
69for my $key (keys %debug) { 70for my $key (keys %debug) {
70 eval "\${dbg_$key} = '$debug{$key}';" 71 eval "\${dbg_$key} = '$debug{$key}';"
71} 72}
@@ -1367,6 +1368,15 @@ sub process {
1367 } 1368 }
1368 next; 1369 next;
1369 } 1370 }
1371# TEST: allow direct testing of the attribute matcher.
1372 if ($dbg_attr) {
1373 if ($line =~ /^.\s*$Attribute\s*$/) {
1374 ERROR("TEST: is attr\n" . $herecurr);
1375 } elsif ($dbg_attr > 1 && $line =~ /^.+($Attribute)/) {
1376 ERROR("TEST: is not attr ($1 is)\n". $herecurr);
1377 }
1378 next;
1379 }
1370 1380
1371# check for initialisation to aggregates open brace on the next line 1381# check for initialisation to aggregates open brace on the next line
1372 if ($prevline =~ /$Declare\s*$Ident\s*=\s*$/ && 1382 if ($prevline =~ /$Declare\s*$Ident\s*=\s*$/ &&