[Stylecheck] Also accept the usage of the x defines.
This commit is contained in:
parent
66b9d658bb
commit
db1f19c8f8
@ -2941,9 +2941,9 @@ sub process {
|
|||||||
$var =~ /[A-Z]\w*[a-z]|[a-z]\w*[A-Z]/ &&
|
$var =~ /[A-Z]\w*[a-z]|[a-z]\w*[A-Z]/ &&
|
||||||
$var !~ /"^(?:Clear|Set|TestClear|TestSet|)Page[A-Z]/ &&
|
$var !~ /"^(?:Clear|Set|TestClear|TestSet|)Page[A-Z]/ &&
|
||||||
!defined $camelcase{$var} &&
|
!defined $camelcase{$var} &&
|
||||||
!($line =~ /^[ +-]*#\s*define/ && $var =~ /[A-Z][A-Z0-9_]*x[A-Z0-9_]*\b/)) {
|
$var !~ /[A-Z][A-Z0-9_]*x[A-Z0-9_]*\b/) {
|
||||||
$camelcase{$var} = 1;
|
$camelcase{$var} = 1;
|
||||||
#print "Camelcase line <<$line>>\n";
|
#print "Camelcase line <<$line>> <<$var>>\n";
|
||||||
WARN("CAMELCASE",
|
WARN("CAMELCASE",
|
||||||
"Avoid CamelCase: <$var>\n" . $herecurr);
|
"Avoid CamelCase: <$var>\n" . $herecurr);
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user