We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent d8d7a83 commit 89d991eCopy full SHA for 89d991e
1 file changed
helper.pl
@@ -68,6 +68,12 @@ sub check_source {
68
$l =~ /^static(\s+[a-zA-Z0-9_]+)+\s+([^_][a-zA-Z0-9_]+)\s*\(/) {
69
push @{$troubles->{staticfunc_name}}, "$lineno($2)";
70
}
71
+ if ($file =~ m|src/.*\.[ch]$| && $l =~ /^\s*#\s*define\s+(_[A-Z_][a-zA-Z0-9_]*)\b/) {
72
+ my $n = $1;
73
+ push @{$troubles->{invalid_macro_name}}, "$lineno($n)"
74
+ unless ($file eq 'src/headers/tomcrypt_cfg.h' && $n eq '__has_builtin') ||
75
+ ($file eq 'src/prngs/rng_get_bytes.c' && $n eq '_WIN32_WINNT');
76
+ }
77
$lineno++;
78
79
for my $k (sort keys %$troubles) {
0 commit comments