Fix preprocessor directive recognition in list-enum-consts.pl
This commit is contained in:
parent
62dddd08fd
commit
7cc4c68eb6
@ -22,7 +22,7 @@ while (<>)
|
||||
$state = 'in';
|
||||
} elsif( $state eq 'in' and /}/ ) {
|
||||
$state = 'out';
|
||||
} elsif( $state eq 'in' and not (/^#if/ or /#endif/)) {
|
||||
} elsif( $state eq 'in' and not /^#/) {
|
||||
s/=.*//; s!/\*.*!!; s/,.*//; s/\s+//g; chomp;
|
||||
push @consts, $_ if $_;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user