wikiheaders.pl: Try to handle functions with multiple declarations better.

This commit is contained in:
Ryan C. Gordon 2021-10-08 20:49:51 -04:00
parent 3970a885a5
commit 55f60847cb
No known key found for this signature in database
GPG Key ID: FA148B892AB48044
1 changed files with 26 additions and 7 deletions

View File

@ -402,14 +402,33 @@ while (readdir(DH)) {
#print("$fn:\n$str\n\n"); #print("$fn:\n$str\n\n");
$headerfuncs{$fn} = $str; # There might be multiple declarations of a function due to #ifdefs,
$headerdecls{$fn} = $decl; # and only one of them will have documentation. If we hit an
$headerfuncslocation{$fn} = $dent; # undocumented one before, delete the placeholder line we left for
$headerfuncschunk{$fn} = scalar(@contents); # it so it doesn't accumulate a new blank line on each run.
$headerfuncshasdoxygen{$fn} = $has_doxygen; my $skipfn = 0;
if (defined $headerfuncshasdoxygen{$fn}) {
if ($headerfuncshasdoxygen{$fn} == 0) { # An undocumented declaration already exists, nuke its placeholder line.
delete $contents[$headerfuncschunk{$fn}]; # delete DOES NOT RENUMBER existing elements!
} else { # documented function already existed?
$skipfn = 1; # don't add this copy to the list of functions.
if ($has_doxygen) {
print STDERR "WARNING: Function '$fn' appears to be documented in multiple locations. Only keeping the first one we saw!\n";
}
push @contents, join("\n", @decllines); # just put the existing declation in as-is.
}
}
if (!$skipfn) {
$headerfuncs{$fn} = $str;
$headerdecls{$fn} = $decl;
$headerfuncslocation{$fn} = $dent;
$headerfuncschunk{$fn} = scalar(@contents);
$headerfuncshasdoxygen{$fn} = $has_doxygen;
push @contents, join("\n", @templines);
push @contents, join("\n", @decllines);
}
push @contents, join("\n", @templines);
push @contents, join("\n", @decllines);
} }
close(FH); close(FH);