|
@@ -5957,7 +5957,7 @@ sub process {
|
|
|
|
|
|
|
|
# check for function declarations that have arguments without identifier names
|
|
# check for function declarations that have arguments without identifier names
|
|
|
if (defined $stat &&
|
|
if (defined $stat &&
|
|
|
- $stat =~ /^.\s*(?:extern\s+)?$Type\s*$Ident\s*\(\s*([^{]+)\s*\)\s*;/s &&
|
|
|
|
|
|
|
+ $stat =~ /^.\s*(?:extern\s+)?$Type\s*(?:$Ident|\(\s*\*\s*$Ident\s*\))\s*\(\s*([^{]+)\s*\)\s*;/s &&
|
|
|
$1 ne "void") {
|
|
$1 ne "void") {
|
|
|
my $args = trim($1);
|
|
my $args = trim($1);
|
|
|
while ($args =~ m/\s*($Type\s*(?:$Ident|\(\s*\*\s*$Ident?\s*\)\s*$balanced_parens)?)/g) {
|
|
while ($args =~ m/\s*($Type\s*(?:$Ident|\(\s*\*\s*$Ident?\s*\)\s*$balanced_parens)?)/g) {
|