|
@@ -4975,6 +4975,17 @@ sub process {
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
+# check for #defines like: 1 << <digit> that could be BIT(digit)
|
|
|
|
+ if ($line =~ /#\s*define\s+\w+\s+\(?\s*1\s*([ulUL]*)\s*\<\<\s*(?:\d+|$Ident)\s*\)?/) {
|
|
|
|
+ my $ull = "";
|
|
|
|
+ $ull = "_ULL" if (defined($1) && $1 =~ /ll/i);
|
|
|
|
+ if (CHK("BIT_MACRO",
|
|
|
|
+ "Prefer using the BIT$ull macro\n" . $herecurr) &&
|
|
|
|
+ $fix) {
|
|
|
|
+ $fixed[$fixlinenr] =~ s/\(?\s*1\s*[ulUL]*\s*<<\s*(\d+|$Ident)\s*\)?/BIT${ull}($1)/;
|
|
|
|
+ }
|
|
|
|
+ }
|
|
|
|
+
|
|
# check for case / default statements not preceded by break/fallthrough/switch
|
|
# check for case / default statements not preceded by break/fallthrough/switch
|
|
if ($line =~ /^.\s*(?:case\s+(?:$Ident|$Constant)\s*|default):/) {
|
|
if ($line =~ /^.\s*(?:case\s+(?:$Ident|$Constant)\s*|default):/) {
|
|
my $has_break = 0;
|
|
my $has_break = 0;
|