Only consider definitions in t_flag_csplit
This commit is contained in:
parent
c7610ed044
commit
1282548a1c
|
|
@ -87,7 +87,7 @@ sub check_cpp {
|
||||||
my $fh = IO::File->new("<$filename") or error("$! $filenme");
|
my $fh = IO::File->new("<$filename") or error("$! $filenme");
|
||||||
my @funcs;
|
my @funcs;
|
||||||
while (defined(my $line = $fh->getline)) {
|
while (defined(my $line = $fh->getline)) {
|
||||||
if ($line =~ /^(void|IData)\s+(.*::.*)/) {
|
if ($line =~ /^(void|IData)\s+(.*::.*){/) {
|
||||||
my $func = $2;
|
my $func = $2;
|
||||||
$func =~ s/\(.*$//;
|
$func =~ s/\(.*$//;
|
||||||
print "\tFunc $func\n" if $Self->{verbose};
|
print "\tFunc $func\n" if $Self->{verbose};
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue